Fixed cify-types bug

db4
Jeremy Hughes 2009-07-05 21:02:19 +12:00
parent 577420b7dd
commit 519277a0a0
1 changed files with 1 additions and 1 deletions

View File

@ -10,7 +10,7 @@ IN: alien.inline.types
"long-" ?head [ "long" prepend ] when ;
: cify-type ( str -- str' )
{ { CHAR: ~ CHAR: space } } substitute ;
{ { CHAR: - CHAR: space } } substitute ;
: const-type? ( str -- ? )
"const-" head? ;