Deploy tool fixes
parent
cf39de0a33
commit
943fe1b6cf
|
@ -29,7 +29,7 @@ TUPLE: no-c-type name ;
|
|||
dup string? [ (c-type) ] when
|
||||
] when ;
|
||||
|
||||
GENERIC: c-type ( name -- type )
|
||||
GENERIC: c-type ( name -- type ) foldable
|
||||
|
||||
: resolve-pointer-type ( name -- name )
|
||||
c-types get at dup string?
|
||||
|
|
|
@ -16,6 +16,7 @@ IN: tools.deploy.shaker
|
|||
: strip-init-hooks ( -- )
|
||||
"Stripping startup hooks" show
|
||||
"command-line" init-hooks get delete-at
|
||||
"mallocs" init-hooks get delete-at
|
||||
strip-io? [ "io.backend" init-hooks get delete-at ] when ;
|
||||
|
||||
: strip-debugger ( -- )
|
||||
|
|
|
@ -6,3 +6,5 @@ IN: libc
|
|||
: free (free) ;
|
||||
|
||||
: realloc (realloc) ;
|
||||
|
||||
: calloc (calloc) ;
|
||||
|
|
Loading…
Reference in New Issue