1DEF_CF( cfunc_nop,
"nop\n" )
2DEF_CF( cfunc_quit,
"quit /return val\n" )
3DEF_CF( cfunc_halt,
"halt\n" )
4DEF_CF( cfunc_exit,
"exit\n" )
5DEF_CF( cfunc_return,
"return val\n" )
6DEF_CF( cfunc_break,
"break\n" )
7DEF_CF( cfunc_continue,
"continue\n" )
8DEF_CF( cfunc_throw,
"throw val /name w word! /no-trace\n" )
9DEF_CF( cfunc_catch,
"catch val block! /name w word!/block!\n" )
10DEF_CF( cfunc_try,
"try val block!\n" )
11DEF_CF( cfunc_recycle,
"recycle\n" )
12DEF_CF( cfunc_do,
"do eval\n" )
13DEF_CF( cfunc_set,
"set w val\n" )
14DEF_CF( cfunc_get,
"get w\n" )
15DEF_CF( cfunc_valueQ,
"value? w\n" )
16DEF_CF( cfunc_in,
"in c context! w\n" )
17DEF_CF( cfunc_words_of,
"words-of c context! 0\n" )
18DEF_CF( cfunc_words_of,
"values-of c context!/hash-map! 1\n" )
19DEF_CF( cfunc_bindingQ,
"binding? w\n" )
20DEF_CF( cfunc_bind,
"bind b w /secure\n" )
21DEF_CF( cfunc_unbind,
"unbind w /deep\n" )
22DEF_CF( cfunc_infuse,
"infuse b block! w\n" )
23DEF_CF( cfunc_add,
"add a b\n" )
24DEF_CF( cfunc_sub,
"sub a b\n" )
25DEF_CF( cfunc_mul,
"mul a b\n" )
26DEF_CF( cfunc_div,
"div a b\n" )
27DEF_CF( cfunc_mod,
"mod a b\n" )
28DEF_CF( cfunc_and,
"and a b\n" )
29DEF_CF( cfunc_or,
"or a b\n" )
30DEF_CF( cfunc_xor,
"xor a b\n" )
31DEF_CF( cfunc_minimum,
"minimum a b\n" )
32DEF_CF( cfunc_maximum,
"maximum a b\n" )
33DEF_CF( cfunc_abs,
"abs n\n" )
34DEF_CF( cfunc_sqrt,
"sqrt n int!/double!\n" )
35DEF_CF( cfunc_cos,
"cos n int!/double!\n" )
36DEF_CF( cfunc_sin,
"sin n int!/double!\n" )
37DEF_CF( cfunc_atan,
"atan n int!/double!/coord!/vec3!\n" )
38DEF_CF( cfunc_make,
"make type spec\n" )
39DEF_CF( cfunc_copy,
"copy val /deep\n" )
40DEF_CF( cfunc_reserve,
"reserve ser size int!\n" )
41DEF_CF( cfunc_does,
"does body block!\n" )
42DEF_CF( cfunc_func,
"func spec block! body block!\n" )
43DEF_CF( cfunc_mold,
"mold val /contents\n" )
44DEF_CF( cfunc_probe,
"probe val\n" )
45DEF_CF( cfunc_prin,
"prin val\n" )
46DEF_CF( cfunc_print,
"print val\n" )
47DEF_CF( cfunc_to_text,
"to-text val\n" )
48DEF_CF( cfunc_all,
"all val block!\n" )
49DEF_CF( cfunc_any,
"any val block!\n" )
50DEF_CF( cfunc_reduce,
"reduce val\n" )
51DEF_CF( cfunc_not,
"not val\n" )
52DEF_CF( cfunc_if,
"if exp body /no-trace\n" )
53DEF_CF( cfunc_ifn,
"ifn exp body /no-trace\n" )
54DEF_CF( cfunc_either,
"either exp a b /no-trace\n" )
55DEF_CF( cfunc_while,
"while exp block! body block! /no-trace\n" )
56DEF_CF( cfunc_forever,
"forever body block! /no-trace\n" )
57DEF_CF( cfunc_loop,
"loop n int!/block! body block! /no-trace\n" )
58DEF_CF( cfunc_select,
"select data val /last /case\n" )
59DEF_CF( cfunc_switch,
"switch val body block!\n" )
60DEF_CF( cfunc_case,
"case body block!\n" )
61DEF_CF( cfunc_first,
"first ser\n" )
62DEF_CF( cfunc_second,
"second ser 1\n" )
63DEF_CF( cfunc_second,
"third ser 2\n" )
64DEF_CF( cfunc_last,
"last ser\n" )
65DEF_CF( cfunc_2plus,
"++ 'w\n" )
66DEF_CF( cfunc_2minus,
"-- 'w\n" )
67DEF_CF( cfunc_prev,
"prev ser\n" )
68DEF_CF( cfunc_next,
"next ser\n" )
69DEF_CF( cfunc_head,
"head ser\n" )
70DEF_CF( cfunc_tail,
"tail ser\n" )
71DEF_CF( cfunc_pick,
"pick ser n\n" )
72DEF_CF( cfunc_poke,
"poke ser n val\n" )
73DEF_CF( cfunc_pop,
"pop ser\n" )
74DEF_CF( cfunc_skip,
"skip ser n /wrap\n" )
75DEF_CF( cfunc_append,
"append ser val /block /repeat a int!\n" )
76DEF_CF( cfunc_appair,
"appair ser a b\n" )
77DEF_CF( cfunc_insert,
"insert ser val /block /part n /repeat a int!\n" )
78DEF_CF( cfunc_change,
"change ser val /slice /part n\n" )
79DEF_CF( cfunc_remove,
"remove ser /slice /part n int! /key val\n" )
80DEF_CF( cfunc_reverse,
"reverse ser /part n int!\n" )
81DEF_CF( cfunc_find,
"find ser val /last /case /part n\n" )
82DEF_CF( cfunc_clear,
"clear ser\n" )
83DEF_CF( cfunc_slice,
"slice ser n\n" )
84DEF_CF( cfunc_emptyQ,
"empty? ser\n" )
85DEF_CF( cfunc_headQ,
"head? ser\n" )
86DEF_CF( cfunc_sizeQ,
"size? ser\n" )
87DEF_CF( cfunc_indexQ,
"index? ser /zero\n" )
88DEF_CF( cfunc_seriesQ,
"series? ser\n" )
89DEF_CF( cfunc_any_blockQ,
"any-block? val\n" )
90DEF_CF( cfunc_any_wordQ,
"any-word? val\n" )
91DEF_CF( cfunc_complement,
"complement val\n" )
92DEF_CF( cfunc_negate,
"negate n\n" )
93DEF_CF( cfunc_intersect,
"intersect a b /case\n" )
94DEF_CF( cfunc_difference,
"difference a b /case\n" )
95DEF_CF( cfunc_union,
"union a b /case\n" )
96DEF_CF( cfunc_sort,
"sort ser /case /group size int!"
97 " /field b block!\n" )
98DEF_CF( cfunc_foreach,
"foreach 'w s body 0 /no-trace\n" )
99DEF_CF( cfunc_foreach,
"remove-each 'w s body 1 /no-trace\n" )
100DEF_CF( cfunc_forall,
"forall 'w word! body block! /no-trace\n" )
101DEF_CF( cfunc_map,
"map 'w word! ser body block! /no-trace\n" )
102DEF_CF( cfunc_infoQ,
"exists? file string!/file! 0\n" )
103DEF_CF( cfunc_infoQ,
"dir? file string!/file! 1\n" )
104DEF_CF( cfunc_infoQ,
"info? file string!/file! 2\n" )
105DEF_CF( cfunc_make_dir,
"make-dir path string!/file! /all\n" )
106DEF_CF( cfunc_change_dir,
"change-dir path string!/file!\n" )
107DEF_CF( cfunc_current_dir,
"current-dir\n" )
108DEF_CF( cfunc_getenv,
"getenv name string!\n" )
109DEF_CF( cfunc_setenv,
"setenv name string! val\n" )
110DEF_CF( cfunc_open,
"open from /read /write /new /nowait\n" )
111DEF_CF( cfunc_read,
"read from /text /into b /append a"
112 " /part size int!\n" )
113DEF_CF( cfunc_write,
"write to data /append /text\n" )
114DEF_CF( cfunc_delete,
"delete file string!/file!\n" )
115DEF_CF( cfunc_rename,
"rename a string!/file! b string!/file!\n" )
116DEF_CF( cfunc_load,
"load from\n" )
117DEF_CF( cfunc_save,
"save to data\n" )
118DEF_CF( cfunc_split,
"split a b /keep\n" )
119DEF_CF( cfunc_parse,
"parse input binary!/string!/block!"
120 " rules block! /case\n" )
121DEF_CF( cfunc_sameQ,
"same? a b\n" )
122DEF_CF( cfunc_equalQ,
"equal? a b\n" )
123DEF_CF( cfunc_neQ,
"ne? a b\n" )
124DEF_CF( cfunc_gtQ,
"gt? a b\n" )
125DEF_CF( cfunc_ltQ,
"lt? a b\n" )
126DEF_CF( cfunc_geQ,
"ge? a b\n" )
127DEF_CF( cfunc_leQ,
"le? a b\n" )
128DEF_CF( cfunc_zeroQ,
"zero? a\n" )
129DEF_CF( cfunc_typeQ,
"type? a\n" )
130DEF_CF( cfunc_encodingQ,
"encoding? s\n" )
131DEF_CF( cfunc_encode,
"encode type s /bom\n" )
132DEF_CF( cfunc_decode,
"decode type word! s string!\n" )
133DEF_CF( cfunc_swap,
"swap b binary!/block! /group size int!\n" )
134DEF_CF( cfunc_lowercase,
"lowercase s\n" )
135DEF_CF( cfunc_uppercase,
"uppercase s\n" )
136DEF_CF( cfunc_trim,
"trim s string! /indent /lines\n" )
137DEF_CF( cfunc_terminate,
"terminate ser val /dir\n" )
138DEF_CF( cfunc_to_hex,
"to-hex n\n" )
139DEF_CF( cfunc_to_dec,
"to-dec n\n" )
140DEF_CF( cfunc_mark_sol,
"mark-sol val /block /clear\n" )
141DEF_CF( cfunc_now,
"now /date\n" )
142DEF_CF( cfunc_cpu_cycles,
"cpu-cycles n int! b block!\n" )
143DEF_CF( cfunc_free,
"free s\n" )
144DEF_CF( cfunc_serialize,
"serialize b block!\n" )
145DEF_CF( cfunc_unserialize,
"unserialize b binary!\n" )
146DEF_CF( cfunc_collect,
"collect type datatype! a block!/paren!"
147 " /unique /into b block!\n" )
148DEF_CF( cfunc_construct,
"construct s b\n" )
149DEF_CF( cfunc_sleep,
"sleep n int!/double!/time!\n" )
150DEF_CF( cfunc_wait,
"wait b\n" )
151DEF_CF( cfunc_format,
"format s block! a\n" )
154 DEF_CF( cfunc_set_addr,
"set-addr p host\n" )
155 DEF_CF( cfunc_hostname,
"hostname p\n" )
158 DEF_CF( cfunc_thread,
"thread body /port\n" )
161 DEF_CF( cfunc_fibre,
"fibre data body\n" )
163#ifdef CONFIG_CHECKSUM
164 DEF_CF( cfunc_hash,
"hash val\n" )
165 DEF_CF( cfunc_checksum,
"checksum val /sha1 /crc16 /crc32\n" )
167#ifdef CONFIG_COMPRESS
168 DEF_CF( cfunc_compress,
"compress s\n" )
169 DEF_CF( cfunc_decompress,
"decompress b\n" )
172 DEF_CF( cfunc_random,
"random a /seed\n" )
175 DEF_CF( cfunc_execute,
"execute s /in a /out b /err c /spawn /port\n" )
176 DEF_CF( cfunc_with_flock,
"with-flock file file! body block! /nowait\n" )
178#ifdef CONFIG_ASSEMBLE
179 DEF_CF( cfunc_assemble,
"assemble s block! body block!\n" )