1 : AFun symPos = 0;
2 : AFun symNoPos = 0;
3 : AFun symFunction = 0;
4 : AFun symFunction1 = 0;
5 : AFun symAssert = 0;
6 : AFun symWith = 0;
7 : AFun symIf = 0;
8 : AFun symOpNot = 0;
9 : AFun symOpEq = 0;
10 : AFun symOpNEq = 0;
11 : AFun symOpAnd = 0;
12 : AFun symOpOr = 0;
13 : AFun symOpImpl = 0;
14 : AFun symOpUpdate = 0;
15 : AFun symSubPath = 0;
16 : AFun symOpHasAttr = 0;
17 : AFun symOpPlus = 0;
18 : AFun symCall = 0;
19 : AFun symSelect = 0;
20 : AFun symVar = 0;
21 : AFun symInt = 0;
22 : AFun symStr = 0;
23 : AFun symPath = 0;
24 : AFun symUri = 0;
25 : AFun symList = 0;
26 : AFun symBlackHole = 0;
27 : AFun symUndefined = 0;
28 : AFun symPrimOp = 0;
29 : AFun symAttrs = 0;
30 : AFun symClosed = 0;
31 : AFun symRec = 0;
32 : AFun symBool = 0;
33 : AFun symNull = 0;
34 : AFun symBind = 0;
35 : AFun symBind2 = 0;
36 : AFun symInherit = 0;
37 : AFun symScope = 0;
38 : AFun symNoDefFormal = 0;
39 : AFun symDefFormal = 0;
40 : AFun symTrue = 0;
41 : AFun symFalse = 0;
42 : AFun symPrimOpDef = 0;
43 : AFun symAttrRHS = 0;
44 : ATerm eTrue = 0;
45 : ATerm eFalse = 0;
46 :
47 23 : void initNixExprHelpers() {
48 23 : symPos = ATmakeAFun("Pos", 3, ATfalse);
49 23 : ATprotectAFun(symPos);
50 23 : symNoPos = ATmakeAFun("NoPos", 0, ATfalse);
51 23 : ATprotectAFun(symNoPos);
52 23 : symFunction = ATmakeAFun("Function", 3, ATfalse);
53 23 : ATprotectAFun(symFunction);
54 23 : symFunction1 = ATmakeAFun("Function1", 3, ATfalse);
55 23 : ATprotectAFun(symFunction1);
56 23 : symAssert = ATmakeAFun("Assert", 3, ATfalse);
57 23 : ATprotectAFun(symAssert);
58 23 : symWith = ATmakeAFun("With", 3, ATfalse);
59 23 : ATprotectAFun(symWith);
60 23 : symIf = ATmakeAFun("If", 3, ATfalse);
61 23 : ATprotectAFun(symIf);
62 23 : symOpNot = ATmakeAFun("OpNot", 1, ATfalse);
63 23 : ATprotectAFun(symOpNot);
64 23 : symOpEq = ATmakeAFun("OpEq", 2, ATfalse);
65 23 : ATprotectAFun(symOpEq);
66 23 : symOpNEq = ATmakeAFun("OpNEq", 2, ATfalse);
67 23 : ATprotectAFun(symOpNEq);
68 23 : symOpAnd = ATmakeAFun("OpAnd", 2, ATfalse);
69 23 : ATprotectAFun(symOpAnd);
70 23 : symOpOr = ATmakeAFun("OpOr", 2, ATfalse);
71 23 : ATprotectAFun(symOpOr);
72 23 : symOpImpl = ATmakeAFun("OpImpl", 2, ATfalse);
73 23 : ATprotectAFun(symOpImpl);
74 23 : symOpUpdate = ATmakeAFun("OpUpdate", 2, ATfalse);
75 23 : ATprotectAFun(symOpUpdate);
76 23 : symSubPath = ATmakeAFun("SubPath", 2, ATfalse);
77 23 : ATprotectAFun(symSubPath);
78 23 : symOpHasAttr = ATmakeAFun("OpHasAttr", 2, ATfalse);
79 23 : ATprotectAFun(symOpHasAttr);
80 23 : symOpPlus = ATmakeAFun("OpPlus", 2, ATfalse);
81 23 : ATprotectAFun(symOpPlus);
82 23 : symCall = ATmakeAFun("Call", 2, ATfalse);
83 23 : ATprotectAFun(symCall);
84 23 : symSelect = ATmakeAFun("Select", 2, ATfalse);
85 23 : ATprotectAFun(symSelect);
86 23 : symVar = ATmakeAFun("Var", 1, ATfalse);
87 23 : ATprotectAFun(symVar);
88 23 : symInt = ATmakeAFun("Int", 1, ATfalse);
89 23 : ATprotectAFun(symInt);
90 23 : symStr = ATmakeAFun("Str", 1, ATfalse);
91 23 : ATprotectAFun(symStr);
92 23 : symPath = ATmakeAFun("Path", 1, ATfalse);
93 23 : ATprotectAFun(symPath);
94 23 : symUri = ATmakeAFun("Uri", 1, ATfalse);
95 23 : ATprotectAFun(symUri);
96 23 : symList = ATmakeAFun("List", 1, ATfalse);
97 23 : ATprotectAFun(symList);
98 23 : symBlackHole = ATmakeAFun("BlackHole", 0, ATfalse);
99 23 : ATprotectAFun(symBlackHole);
100 23 : symUndefined = ATmakeAFun("Undefined", 0, ATfalse);
101 23 : ATprotectAFun(symUndefined);
102 23 : symPrimOp = ATmakeAFun("PrimOp", 3, ATfalse);
103 23 : ATprotectAFun(symPrimOp);
104 23 : symAttrs = ATmakeAFun("Attrs", 1, ATfalse);
105 23 : ATprotectAFun(symAttrs);
106 23 : symClosed = ATmakeAFun("Closed", 1, ATfalse);
107 23 : ATprotectAFun(symClosed);
108 23 : symRec = ATmakeAFun("Rec", 2, ATfalse);
109 23 : ATprotectAFun(symRec);
110 23 : symBool = ATmakeAFun("Bool", 1, ATfalse);
111 23 : ATprotectAFun(symBool);
112 23 : symNull = ATmakeAFun("Null", 0, ATfalse);
113 23 : ATprotectAFun(symNull);
114 23 : symBind = ATmakeAFun("Bind", 3, ATfalse);
115 23 : ATprotectAFun(symBind);
116 23 : symBind2 = ATmakeAFun("Bind", 2, ATfalse);
117 23 : ATprotectAFun(symBind2);
118 23 : symInherit = ATmakeAFun("Inherit", 3, ATfalse);
119 23 : ATprotectAFun(symInherit);
120 23 : symScope = ATmakeAFun("Scope", 0, ATfalse);
121 23 : ATprotectAFun(symScope);
122 23 : symNoDefFormal = ATmakeAFun("NoDefFormal", 1, ATfalse);
123 23 : ATprotectAFun(symNoDefFormal);
124 23 : symDefFormal = ATmakeAFun("DefFormal", 2, ATfalse);
125 23 : ATprotectAFun(symDefFormal);
126 23 : symTrue = ATmakeAFun("True", 0, ATfalse);
127 23 : ATprotectAFun(symTrue);
128 23 : symFalse = ATmakeAFun("False", 0, ATfalse);
129 23 : ATprotectAFun(symFalse);
130 23 : symPrimOpDef = ATmakeAFun("PrimOpDef", 2, ATfalse);
131 23 : ATprotectAFun(symPrimOpDef);
132 23 : symAttrRHS = ATmakeAFun("AttrRHS", 2, ATfalse);
133 23 : ATprotectAFun(symAttrRHS);
134 23 : eTrue = makeBool(makeTrue());
135 23 : eFalse = makeBool(makeFalse());
136 : }
|