1 | Типы |
---|
2 | [+/-] CHANNEL |
---|
3 | [-] FUNC |
---|
4 | [+] INT |
---|
5 | [+] STRING |
---|
6 | [+] TABLE |
---|
7 | [+] VECTOR |
---|
8 | [+/-] WORD |
---|
9 | |
---|
10 | File APPLY.RFI: |
---|
11 | |
---|
12 | [-] $func? APPLY s.Name e.Exp = e.Exp; |
---|
13 | |
---|
14 | File ARITHM.RFI: |
---|
15 | |
---|
16 | [+] $func "+" s.Int1 s.Int2 = s.Int; |
---|
17 | [+] $func "-" s.Int1 s.Int2 = s.Int; |
---|
18 | [+] $func "*" s.Int1 s.Int2 = s.Int; |
---|
19 | [+] $func DIV-REM s.Int1 s.Int2 = s.Quo s.Rem; |
---|
20 | [+] $func DIV s.Int1 s.Int2 = s.Quo; |
---|
21 | [+] $func REM s.Int1 s.Int2 = s.Rem; |
---|
22 | [+] $func GCD s.Int1 s.Int2 = s.Gcd; |
---|
23 | |
---|
24 | File ACCESS.RFI: |
---|
25 | |
---|
26 | [+] $func LENGTH e.Exp = s.ExpLen; |
---|
27 | [+] $func? LEFT s.Left s.Len e.Exp = e.SubExp; |
---|
28 | [+] $func? RIGHT s.Right s.Len e.Exp = e.SubExp; |
---|
29 | [+] $func? MIDDLE s.Left s.Right e.Exp = e.SubExp; |
---|
30 | [+] $func? L s.Left e.Exp = t.SubTerm; |
---|
31 | [+] $func? R s.Right e.Exp = t.SubTerm; |
---|
32 | |
---|
33 | File BOX.RFI: |
---|
34 | |
---|
35 | [+] $func BOX e.Exp = s.Box; |
---|
36 | [+] $func ? s.Box = e.Exp; |
---|
37 | [+] $func STORE s.Box e.Exp = ; |
---|
38 | |
---|
39 | File CLASS.RFI: |
---|
40 | |
---|
41 | [+] $func? BOX? e.Exp = ; |
---|
42 | [+] $func? CHANNEL? e.Exp = ; |
---|
43 | [+] $func? CHAR? e.Exp = ; |
---|
44 | [+] $func? DIGIT? e.Exp = ; |
---|
45 | [-] $func? FUNC? e.Exp = ; |
---|
46 | [+] $func? INT? e.Exp = ; |
---|
47 | [+] $func? LETTER? e.Exp = ; |
---|
48 | [+] $func? STRING? e.Exp = ; |
---|
49 | [+] $func? TABLE? e.Exp = ; |
---|
50 | [+] $func? VECTOR? e.Exp = ; |
---|
51 | [+] $func? WORD? e.Exp = ; |
---|
52 | |
---|
53 | File COMPARE.RFI: |
---|
54 | |
---|
55 | [+] $func? ">=" (e.Exp1)(e.Exp2) = ; |
---|
56 | [+] $func? ">" (e.Exp1)(e.Exp2) = ; |
---|
57 | [+] $func? "<=" (e.Exp1)(e.Exp2) = ; |
---|
58 | [+] $func? "<" (e.Exp1)(e.Exp2) = ; |
---|
59 | [+] $func? "/=" (e.Exp1)(e.Exp2) = ; |
---|
60 | [+] $func? "=" (e.Exp1)(e.Exp2) = ; |
---|
61 | [+] $func COMPARE (e.Exp1)(e.Exp2) = s.Res; * '<', '>', '=' |
---|
62 | |
---|
63 | File CONVERT.RFI: |
---|
64 | |
---|
65 | [+] $func CHARS-TO-BYTES e.Int = e.Char; |
---|
66 | [+] $func BYTES-TO-CHARS e.Char = e.Int; |
---|
67 | [+] $func TO-LOWER e.Char = e.Char; |
---|
68 | [+] $func TO-UPPER e.Char = e.Char; |
---|
69 | [+] $func? TO-INT e.Exp = s.Int; |
---|
70 | [+] $func TO-CHARS e.Exp = e.Char; |
---|
71 | [+] $func TO-WORD e.Exp = s.Word; |
---|
72 | |
---|
73 | File DOS.RFI: |
---|
74 | |
---|
75 | [-] $func ARG s.Int = e.Arg; |
---|
76 | [-] $func GETENV e.VarName = e.Value; |
---|
77 | [+] $func TIME = e.String; |
---|
78 | [+] $func EXIT s.ReturnCode = ; |
---|
79 | [-] $func DELAY s.Interv = ; |
---|
80 | [-] $func SLEEP s.Interv = ; |
---|
81 | [-] $func RANDOM s.Limit = s.Rand; /* 0 <= s.Rand < s.Limit */ |
---|
82 | [-] $func RANDOMIZE = ; |
---|
83 | |
---|
84 | File STDIO.RFI: |
---|
85 | |
---|
86 | [+] $func CHANNEL = s.Channel; |
---|
87 | [+] $func? OPEN-FILE s.Channel e.FileName s.Mode = ; |
---|
88 | [+] $func CLOSE-CHANNEL s.Channel = ; |
---|
89 | [-] $func PARSE-FILE-NAME e.FileName = s.DriveWord s.PathWord s.NameWord s.ExtWord; |
---|
90 | [-] $func? ERASE-FILE e.FileName = ; |
---|
91 | [-] $func? EOF? s.Channel = ; |
---|
92 | [-] $func? READ = t.Term; |
---|
93 | [-] $func? READ-CHAR = s.Char; |
---|
94 | [-] $func? READ-LINE = e.Char; |
---|
95 | [+/-] $func WRITE e.Expr = ; |
---|
96 | [+/-] $func WRITELN e.Expr = ; |
---|
97 | [+/-] $func PRINT e.Expr = ; |
---|
98 | [+/-] $func PRINTLN e.Expr = ; |
---|
99 | [-] $func? READ! s.Channel = t.Term; |
---|
100 | [-] $func? READ-CHAR! s.Channel = s.Char; |
---|
101 | [-] $func? READ-LINE! s.Channel = e.Char; |
---|
102 | [-] $func WRITE! s.Channel e.Expr = ; |
---|
103 | [-] $func WRITELN! s.Channel e.Expr = ; |
---|
104 | [-] $func PRINT! s.Channel e.Expr = ; |
---|
105 | [-] $func PRINTLN! s.Channel e.Expr = ; |
---|
106 | |
---|
107 | File STRING.RFI: |
---|
108 | |
---|
109 | [+] $func STRING e.Source = s.String; |
---|
110 | [+] $func STRING-INIT s.String s.Len s.Fill = ; |
---|
111 | [+] $func STRING-FILL s.String s.Fill = ; |
---|
112 | [+] $func STRING-LENGTH s.String = s.Len; |
---|
113 | [+] $func STRING-REF s.String s.Index = s.Char; |
---|
114 | [+] $func STRING-SET s.String s.Index s.Char = ; |
---|
115 | [+] $func STRING-REPLACE s.String e.Source = ; |
---|
116 | [+] $func SUBSTRING s.String s.Index s.Len = s.NewString; |
---|
117 | [+] $func SUBSTRING-FILL s.String s.Index s.Len s.Fill = ; |
---|
118 | |
---|
119 | File TABLE.RFI: |
---|
120 | |
---|
121 | [+] $func TABLE = s.Tab; |
---|
122 | [+] $func BIND s.Tab (e.Key) (e.Val) = ; |
---|
123 | [+] $func UNBIND s.Tab e.Key = ; |
---|
124 | [+] $func TABLE-COPY s.Tab = s.TabCopy ; |
---|
125 | [+] $func REPLACE-TABLE s.TargetTab s.SourceTab = ; |
---|
126 | [+] $func? LOOKUP s.Tab e.Key = e.Val; |
---|
127 | [+] $func? IN-TABLE? s.Tab e.Key = ; |
---|
128 | [+] $func? DOMAIN s.Tab = e.KeyList ; |
---|
129 | |
---|
130 | File VECTOR.RFI: |
---|
131 | |
---|
132 | [+] $func VECTOR e.Source = s.Vector; |
---|
133 | [+] $func VECTOR-TO-EXP s.Vector = e.Exp; |
---|
134 | [+] $func VECTOR-INIT s.Vector s.Len e.Fill = ; |
---|
135 | [+] $func VECTOR-FILL s.Vector e.Fill = ; |
---|
136 | [+] $func VECTOR-LENGTH s.Vector = s.Len; |
---|
137 | [+] $func VECTOR-REF s.Vector s.Index = e.Exp; |
---|
138 | [+] $func VECTOR-SET s.Vector s.Index e.Exp = ; |
---|
139 | [+] $func VECTOR-REPLACE s.Vector e.Source = ; |
---|
140 | [+] $func SUBVECTOR s.Vector s.Index s.Len = s.NewVector; |
---|
141 | [+] $func SUBVECTOR-FILL s.Vector s.Index s.Len e.Fill = ; |
---|
142 | |
---|
143 | //////////////////////////////////////////////////////////////////////////////////// |
---|
144 | |
---|
145 | File BIT.RFI: |
---|
146 | |
---|
147 | [-] $func BIT-OR s.Int1 s.Int2 = s.Int; |
---|
148 | [-] $func BIT-AND s.Int1 s.Int2 = s.Int; |
---|
149 | [-] $func BIT-XOR s.Int1 s.Int2 = s.Int; |
---|
150 | [-] $func BIT-NOT s.Int = s.Int; |
---|
151 | [-] $func BIT-LEFT s.Int s.Shift = s.Int; |
---|
152 | [-] $func BIT-RIGHT s.Int s.Shift = s.Int; |
---|
153 | [-] $func? BIT-TEST s.Int s.Pos = ; |
---|
154 | [-] $func BIT-SET s.Int s.Pos = s.Int; |
---|
155 | [-] $func BIT-CLEAR s.Int s.Pos = s.Int; |
---|
156 | [-] $func BIT-PRINT s.Int = ; |
---|
157 | [-] $func BIT-LENGTH s.Int = s.Len; |
---|
158 | |
---|
159 | File CONIO.RFI: |
---|
160 | |
---|
161 | [-] $func? KEY-PRESSED? = ; |
---|
162 | [-] $func READ-KEY = s.Char; |
---|
163 | [-] $func GET-SCR-CHAR-ATTR s.Row s.Col = s.Ch s.Attr; |
---|
164 | [-] $func PUT-SCR-CHAR s.Row s.Col s.Ch = ; |
---|
165 | [-] $func PUT-SCR-ATTR s.Row s.Col s.Attr = ; |
---|
166 | [-] $func GET-FIELD-STR s.Row s.Col s.Length = s.Chars; |
---|
167 | [-] $func PUT-FIELD-STR s.Row s.Col s.Length s.Chars = ; |
---|
168 | [-] $func PUT-FIELD-ATTR s.Row s.Col s.Length s.Attr = ; |
---|
169 | [-] $func GET-CURSOR = s.Row s.Col; |
---|
170 | [-] $func SET-CURSOR s.Row s.Col = ; |
---|
171 | [-] $func GET-CURSOR-FORM = s.StartLine s.EndLine; |
---|
172 | [-] $func SET-CURSOR-FORM s.StartLine s.EndLine = ; |
---|
173 | [-] $func GET-ATTRIBUTE = s.Attr; |
---|
174 | [-] $func SET-ATTRIBUTE s.Attr = ; |
---|
175 | [-] $func GET-TEXT-MODE = s.Rows s.Cols; |
---|
176 | [-] $func CLEAR-SCREEN = ; |
---|
177 | [-] $func CWRITE e.Expr = ; |
---|
178 | [-] $func CWRITELN e.Expr = ; |
---|
179 | [-] $func CPRINT e.Expr = ; |
---|
180 | [-] $func CPRINTLN e.Expr = ; |
---|
181 | |
---|
182 | File HOLE.RFI: |
---|
183 | |
---|
184 | [-] $func SETHOLE s.LHOLE s.RHOLE s.STARTHOLE = ; |
---|
185 | [-] $func GETHOLE = s.LHOLE s.RHOLE s.STARTHOLE; |
---|
186 | [-] /*$func GARB = ;*/ |
---|
187 | |
---|
188 | File RF5LIB.RFI: |
---|
189 | |
---|
190 | [-] $func "rf5CARD" e.Prompt = e.Line; |
---|
191 | [-] $func "rf5CLOSE" s.Fnum = ; |
---|
192 | [-] $func "rf5GET" s.Fnum = e.Line; |
---|
193 | [-] $func "rf5OPEN" s.Mode s.Fnum e.Fname = ; |
---|
194 | [-] $func "rf5PRINT" e.Line = e.Line; |
---|
195 | [-] $func "rf5PUT" s.Fnum e.Line = e.Line; |
---|
196 | [-] $func "rf5PUTOUT" s.Fnum e.Line = ; |
---|
197 | [-] $func "rf5ADD" (s)s = s; |
---|
198 | [-] $func "rf5DIV" (s)s = s; |
---|
199 | [-] $func "rf5DIVMOD" (s)s = (s.Quot)s.Rem ; |
---|
200 | [-] $func "rf5MOD" (s)s = s; |
---|
201 | [-] $func "rf5MUL" (s)s = s; |
---|
202 | [-] $func "rf5SUB" (s)s = s; |
---|
203 | [-] $func "rf5BR" e =; |
---|
204 | [-] $func "rf5CP" e.Key = e.Val; |
---|
205 | [-] $func "rf5DG" e.Key = e.Val; |
---|
206 | [-] $func "rf5DGALL" = e.Stack; |
---|
207 | [-] $func "rf5RP" e =; |
---|
208 | [-] $func "rf5FIRST" s.N e.Exp = (e.Prefix) e.Postfix; |
---|
209 | [-] $func "rf5LAST" s.N e.Exp = (e.Prefix) e.Postfix; |
---|
210 | [-] $func "rf5LENW" e.Exp = s.Len e.Exp; |
---|
211 | [-] $func "rf5TYPE" e.Exp = s.Type e.Exp; |
---|
212 | [-] $func "rf5NUMB" e = s; |
---|
213 | |
---|
214 | File RF5_BRDG.RFI: |
---|
215 | |
---|
216 | [-] $func "rf5BR" eKV = ; |
---|
217 | [-] $func "rf5DGALL" = ex ; |
---|
218 | [-] $func "rf5CP" eKey = eVal ; |
---|
219 | [-] $func "rf5RP" eKV = ; |
---|
220 | [-] $func "rf5DG" eKey = eVal ; |
---|
221 | [-] $func "rf5NUMB" eStr = eNum ; |
---|
222 | |
---|
223 | File RF5_SUPP.RFI: |
---|
224 | |
---|
225 | [-] $func "dgall" stab = etabrepr; |
---|
226 | [-] $func Bind-without-replace stab (ekey) (eval) = ; |
---|
227 | |
---|