steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix compile errors

db4
slava 2008-07-03 18:39:56 -05:00
parent ab881cbd7a
commit dc2c0876b6
2 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
vm/os-unix.h
View File

@ -6,6 +6,7 @@
#include <sys/time.h>
#include <dlfcn.h>
#include <signal.h>
#include <pthread.h>
typedef char F_CHAR;
typedef char F_SYMBOL;

4
vm/types.c
View File

@ -12,7 +12,7 @@ bool to_boolean(CELL value)
return value != F;
}
CELL clone(CELL object)
CELL clone_object(CELL object)
{
CELL size = object_size(object);
if(size == 0)
@ -31,7 +31,7 @@ CELL clone(CELL object)
DEFINE_PRIMITIVE(clone)
{
drepl(clone(dpeek()));
drepl(clone_object(dpeek()));
}
F_WORD *allot_word(CELL vocab, CELL name)