forked from kevinlawler/kona
-
Notifications
You must be signed in to change notification settings - Fork 0
/
kc.h
56 lines (56 loc) · 1.02 KB
/
kc.h
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
void init_genrand64(unsigned long long seed);
extern I SEED;
K _dot_t();
K newE(S s,K k);
K newEntry(S s);
K Kd();
extern K KTREE;
I test();
extern S IFS[3];
extern S IFP[3];
extern S LS;
S sp(S k);
extern S __d;
K Kn();
extern K NIL;
void seedPRNG(I s);
N newN();
extern N SYMBOLS;
extern V offsetSSR,offsetWhat,offsetAt,offsetDot,offsetColon;
extern C vc[];
I charpos(S s,C c);
extern V vd[];
extern V adverbs[];
extern V vt_[];
extern V vd_[];
extern V vm_[];
extern V vn_[];
void finally();
I kinit();
extern K KFIXED;
K load(S s);
I args(int n,S *v);
K read_tape(I i,I type);
I wipe_tape(I i);
extern S PORT;
I attend();
extern fd_set master;
K wd(S s,I n);
K ex(K a);
I line(FILE *f,S *a,I *n,PDA *p);
I lines(FILE *f);
K kap(K *a,V v);
K cd(K a);
void pdafree(PDA p);
K newK(I t,I n);
K kerr(cS s);
K show(K a);
I parsedepth(PDA p);
I complete(S a,I n,PDA *q,I *marks);
I appender(S *s,I *n,S t,I k);
I wds(K *a,FILE*f);
I wds_(K *a,FILE *f,I l);
I prompt(I n);
extern I adverb_ct;
extern I vn_ct,vm_ct,vd_ct,vt_ct;
extern I interrupted;