alien.inline: added RAW-C: word

2009-07-08 16:45:21 +12:00 · 2009-07-08 16:45:21 +12:00 · ed825133e0
parent 8814e2b308
commit ed825133e0
1 changed files with 3 additions and 0 deletions
--- a/basis/alien/inline/inline.factor
+++ b/basis/alien/inline/inline.factor
@ -129,3 +129,6 @@ SYNTAX: C-STRUCTURE:
 SYNTAX: ;C-LIBRARY compile-c-library ;

 SYNTAX: DELETE-C-LIBRARY: scan delete-inline-library ;
+
+SYNTAX: RAW-C:
+    [ "\n" % parse-here % "\n" % c-strings get push ] "" make ;