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

Deploy tool fixes

release
Slava Pestov 2007-11-04 21:24:08 -05:00
parent cf39de0a33
commit 943fe1b6cf
3 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
core/alien/c-types/c-types.factor
View File

@ -29,7 +29,7 @@ TUPLE: no-c-type name ;
dup string? [ (c-type) ] when dup string? [ (c-type) ] when
] when ; ] when ;
GENERIC: c-type ( name -- type ) GENERIC: c-type ( name -- type ) foldable
: resolve-pointer-type ( name -- name ) : resolve-pointer-type ( name -- name )
c-types get at dup string? c-types get at dup string?

1
extra/tools/deploy/shaker/shaker.factor
View File

@ -16,6 +16,7 @@ IN: tools.deploy.shaker
: strip-init-hooks ( -- ) : strip-init-hooks ( -- )
"Stripping startup hooks" show "Stripping startup hooks" show
"command-line" init-hooks get delete-at "command-line" init-hooks get delete-at
"mallocs" init-hooks get delete-at
strip-io? [ "io.backend" init-hooks get delete-at ] when ; strip-io? [ "io.backend" init-hooks get delete-at ] when ;
: strip-debugger ( -- ) : strip-debugger ( -- )

2
extra/tools/deploy/shaker/strip-libc.factor
View File

@ -6,3 +6,5 @@ IN: libc
: free (free) ; : free (free) ;
: realloc (realloc) ; : realloc (realloc) ;
: calloc (calloc) ;