Fixed cify-types bug

2009-07-05 21:02:19 +12:00 · 2009-07-05 21:02:19 +12:00 · 519277a0a0
parent 577420b7dd
commit 519277a0a0
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? ;