A clone for the Eloquent in Bitbucket
Hello, world! 我是 Liutos，一名钟爱 Common Lisp 的程序员。
尽管我最钟爱的是 Common Lisp，但我是从 C 语言开始接触编程的，入行后最先使用的是 Ruby，后来是 PHP、Node.js。现在则是 Python 和 Go。
但无论如何，最有意思的当然是 Common Lisp 了——尽管从来没有在工作中正经用过。
我写字的地方，欢迎订阅或关注
我的开源项目
技术栈
$ make
gcc -Wall -g -std=c99 -D_GNU_SOURCE -lgc -c hash_table.c -o hash_table.o
clang: warning: -lgc: 'linker' input unused
gcc -Wall -g -std=c99 -D_GNU_SOURCE -lgc -c macros.c -o macros.o
clang: warning: -lgc: 'linker' input unused
gcc -Wall -g -std=c99 -D_GNU_SOURCE -lgc -c object.c -o object.o
clang: warning: -lgc: 'linker' input unused
object.c:241:10: warning: cast to 'lt *' (aka 'struct lisp_object_t *') from
smaller integer type 'int' [-Wint-to-pointer-cast]
return (lt *)((value << FIXNUM_BITS) | FIXNUM_TAG);
^
object.c:286:18: warning: implicit declaration of function 'fmemopen' is invalid
in C99 [-Wimplicit-function-declaration]
FILE *stream = fmemopen(str, strlen(str), "r");
^
object.c:286:9: warning: incompatible integer to pointer conversion initializing
'FILE *' (aka 'struct __sFILE *') with an expression of type 'int'
[-Wint-conversion]
FILE *stream = fmemopen(str, strlen(str), "r");
^ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
object.c:300:9: warning: incompatible integer to pointer conversion initializing
'FILE *' (aka 'struct __sFILE *') with an expression of type 'int'
[-Wint-conversion]
FILE *stream = fmemopen(str, strlen(str), "w");
^ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
4 warnings generated.
gcc -Wall -g -std=c99 -D_GNU_SOURCE -lgc -c prims.c -o prims.o
clang: warning: -lgc: 'linker' input unused
In file included from prims.c:19:
./object.h:80:12: error: conflicting types for 'isnumber'
extern int isnumber(lt *);
^
/usr/include/ctype.h:323:1: note: previous definition is here
isnumber(int _c)
^
prims.c:103:57: warning: format specifies type 'int' but the argument has type
'intptr_t' (aka 'long') [-Wformat]
nch = fprintf(output_port_stream(dest), "%d", fixnum_value(arg));
~~ ^~~~~~~~~~~~~~~~~
%ld
./type.h:187:25: note: expanded from macro 'fixnum_value'
#define fixnum_value(x) (((intptr_t)(x)) >> FIXNUM_BITS)
^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
prims.c:596:19: warning: incompatible pointer to integer conversion passing
'lisp_object_t *' (aka 'struct lisp_object_t *') to parameter of type
'int' [-Wint-conversion]
assert(isnumber(n) && isnumber(m));
^
/usr/include/assert.h:93:25: note: expanded from macro 'assert'
(__builtin_expect(!(e), 0) ? __assert_rtn(__func__, __FILE__, __LINE...
^
/usr/include/ctype.h:323:14: note: passing argument to parameter '_c' here
isnumber(int _c)
^
prims.c:596:34: warning: incompatible pointer to integer conversion passing
'lisp_object_t *' (aka 'struct lisp_object_t *') to parameter of type
'int' [-Wint-conversion]
assert(isnumber(n) && isnumber(m));
^
/usr/include/assert.h:93:25: note: expanded from macro 'assert'
(__builtin_expect(!(e), 0) ? __assert_rtn(__func__, __FILE__, __LINE...
^
/usr/include/ctype.h:323:14: note: passing argument to parameter '_c' here
isnumber(int _c)
^
prims.c:613:19: warning: incompatible pointer to integer conversion passing
'lisp_object_t *' (aka 'struct lisp_object_t *') to parameter of type
'int' [-Wint-conversion]
assert(isnumber(n) && isnumber(m));
^
/usr/include/assert.h:93:25: note: expanded from macro 'assert'
(__builtin_expect(!(e), 0) ? __assert_rtn(__func__, __FILE__, __LINE...
^
/usr/include/ctype.h:323:14: note: passing argument to parameter '_c' here
isnumber(int _c)
^
prims.c:613:34: warning: incompatible pointer to integer conversion passing
'lisp_object_t *' (aka 'struct lisp_object_t *') to parameter of type
'int' [-Wint-conversion]
assert(isnumber(n) && isnumber(m));
^
/usr/include/assert.h:93:25: note: expanded from macro 'assert'
(__builtin_expect(!(e), 0) ? __assert_rtn(__func__, __FILE__, __LINE...
^
/usr/include/ctype.h:323:14: note: passing argument to parameter '_c' here
isnumber(int _c)
^
prims.c:754:31: warning: format specifies type 'int' but the argument has type
'intptr_t' (aka 'long') [-Wformat]
int n = sprintf(sym, "G%d", fixnum_value(gensym_counter));
~~~~~~~~~~~~~~~~~~~~^~~~~~~~~~~~~~~~~~~~~~~~~~~~~
%ld
./type.h:187:25: note: expanded from macro 'fixnum_value'
#define fixnum_value(x) (((intptr_t)(x)) >> FIXNUM_BITS)
^
/usr/include/secure/_stdio.h:47:56: note: expanded from macro 'sprintf'
__builtin___sprintf_chk (str, 0, __darwin_obsz(str), __VA_ARGS__)
^
prims.c:1016:16: warning: incompatible pointer to integer conversion passing
'lt *' (aka 'struct lisp_object_t *') to parameter of type 'int'
[-Wint-conversion]
if (isnumber(x) && isnumber(y))
^
/usr/include/ctype.h:323:14: note: passing argument to parameter '_c' here
isnumber(int _c)
^
prims.c:1016:31: warning: incompatible pointer to integer conversion passing
'lt *' (aka 'struct lisp_object_t *') to parameter of type 'int'
[-Wint-conversion]
if (isnumber(x) && isnumber(y))
^
/usr/include/ctype.h:323:14: note: passing argument to parameter '_c' here
isnumber(int _c)
^
prims.c:1336:16: warning: implicit declaration of function 'fmemopen' is invalid
in C99 [-Wimplicit-function-declaration]
FILE *file = fmemopen(text, strlen(text), "r");
^
prims.c:1336:9: warning: incompatible integer to pointer conversion initializing
'FILE *' (aka 'struct __sFILE *') with an expression of type 'int'
[-Wint-conversion]
FILE *file = fmemopen(text, strlen(text), "r");
^ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
prims.c:1392:22: warning: implicit conversion from enumeration type
'enum OPCODE_TYPE' to different enumeration type 'enum TYPE'
[-Wenum-conversion]
lt *code = seq(gen(ARGS, make_fixnum(1)), gen(LVAR, make_fixnum(0), ma...
~~~ ^~~~
./prims.h:97:27: note: expanded from macro 'seq'
#define seq(...) append_n(__VA_ARGS__, NULL)
^
prims.c:1392:49: warning: implicit conversion from enumeration type
'enum OPCODE_TYPE' to different enumeration type 'enum TYPE'
[-Wenum-conversion]
lt *code = seq(gen(ARGS, make_fixnum(1)), gen(LVAR, make_fixnum(0), ma...
~~~ ^~~~
./prims.h:97:27: note: expanded from macro 'seq'
#define seq(...) append_n(__VA_ARGS__, NULL)
^
prims.c:1392:100: warning: implicit conversion from enumeration type
'enum OPCODE_TYPE' to different enumeration type 'enum TYPE'
[-Wenum-conversion]
...gen(LVAR, make_fixnum(0), make_fixnum(0), S("x")), gen(RETURN));
~~~ ^~~~~~
./prims.h:97:27: note: expanded from macro 'seq'
#define seq(...) append_n(__VA_ARGS__, NULL)
^
13 warnings and 1 error generated.
make: *** [prims.o] Error 1
我用Windows，請求支持。
React
A declarative, efficient, and flexible JavaScript library for building user interfaces.
🖖 Vue.js is a progressive, incrementally-adoptable JavaScript framework for building UI on the web.
Typescript
TypeScript is a superset of JavaScript that compiles to clean JavaScript output.
An Open Source Machine Learning Framework for Everyone
Django
The Web framework for perfectionists with deadlines.
Laravel
A PHP framework for web artisans
Bring data to life with SVG, Canvas and HTML. 📊📈🎉
JavaScript (JS) is a lightweight interpreted programming language with first-class functions.
Some thing interesting about web. New door for the world.
A server is a program made to process requests and deliver data to clients.
Machine learning is a way of modeling and interpreting data that allows a piece of software to respond intelligently.
Some thing interesting about visualization, use data art
Some thing interesting about game, make everyone happy.
Facebook
We are working to build community through open source technology. NB: members must have two-factor auth.
Microsoft
Open source projects and samples from Microsoft.
Google
Google ❤️ Open Source for everyone.
Alibaba
Alibaba Open Source for everyone
D3
Data-Driven Documents codes.
Tencent
China tencent open source team.