30 |
void |
void |
31 |
Floop(object form) |
Floop(object form) |
32 |
{ |
{ |
|
object endp_temp; |
|
33 |
|
|
34 |
object x; |
object x; |
35 |
object *oldlex = lex_env; |
object *oldlex = lex_env; |
82 |
void |
void |
83 |
do_var_list(object var_list) |
do_var_list(object var_list) |
84 |
{ |
{ |
|
object endp_temp; |
|
85 |
|
|
86 |
object is, x, y; |
object is, x, y; |
87 |
|
|
121 |
} |
} |
122 |
|
|
123 |
void |
void |
124 |
Fdo(object arg) |
Fdo(VOL object arg) |
125 |
{ |
{ |
|
object endp_temp; |
|
126 |
|
|
127 |
object *oldlex = lex_env; |
object *oldlex = lex_env; |
128 |
object *old_top; |
object *old_top; |
206 |
} |
} |
207 |
|
|
208 |
void |
void |
209 |
FdoA(object arg) |
FdoA(VOL object arg) |
210 |
{ |
{ |
|
object endp_temp; |
|
211 |
|
|
212 |
object *oldlex = lex_env; |
object *oldlex = lex_env; |
213 |
object *old_top; |
object *old_top; |
284 |
} |
} |
285 |
|
|
286 |
void |
void |
287 |
Fdolist(object arg) |
Fdolist(VOL object arg) |
288 |
{ |
{ |
|
object endp_temp; |
|
289 |
|
|
290 |
object *oldlex = lex_env; |
object *oldlex = lex_env; |
291 |
object *old_top; |
object *old_top; |
365 |
} |
} |
366 |
|
|
367 |
void |
void |
368 |
Fdotimes(object arg) |
Fdotimes(VOL object arg) |
369 |
{ |
{ |
|
object endp_temp; |
|
370 |
|
|
371 |
object *oldlex = lex_env; |
object *oldlex = lex_env; |
372 |
object *old_top; |
object *old_top; |