Fixed cify-types bug

2009-07-05 21:02:19 +12:00 · 2009-07-05 21:02:19 +12:00 · 638847d17a
parent 819fcb6ef1
commit 638847d17a
1 changed files with 1 additions and 1 deletions
--- a/basis/alien/inline/types/types.factor
+++ b/basis/alien/inline/types/types.factor
@ -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? ;