/[gcl]/gcl/o/iteration.c
ViewVC logotype

Diff of /gcl/o/iteration.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3 by camm, Tue Sep 24 19:01:45 2002 UTC revision 1.4 by camm, Sat Feb 15 00:38:28 2003 UTC
# Line 27  Foundation, 675 Mass Ave, Cambridge, MA Line 27  Foundation, 675 Mass Ave, Cambridge, MA
27    
28  #include "include.h"  #include "include.h"
29    
30  void  static void
31  Floop(object form)  Floop(object form)
32  {  {
33    
# Line 79  LOOP: Line 79  LOOP:
79                                          during the main loop.                                          during the main loop.
80  */  */
81    
82  void  static void
83  do_var_list(object var_list)  do_var_list(object var_list)
84  {  {
85    
# Line 120  do_var_list(object var_list) Line 120  do_var_list(object var_list)
120          }          }
121  }  }
122    
123  void  static void
124  Fdo(VOL object arg)  Fdo(VOL object arg)
125  {  {
126    
# Line 205  END: Line 205  END:
205          lex_env = oldlex;          lex_env = oldlex;
206  }  }
207    
208  void  static void
209  FdoA(VOL object arg)  FdoA(VOL object arg)
210  {  {
211    
# Line 283  END: Line 283  END:
283          lex_env = oldlex;          lex_env = oldlex;
284  }  }
285    
286  void  static void
287  Fdolist(VOL object arg)  Fdolist(VOL object arg)
288  {  {
289    
# Line 364  END: Line 364  END:
364          lex_env = oldlex;          lex_env = oldlex;
365  }  }
366    
367  void  static void
368  Fdotimes(VOL object arg)  Fdotimes(VOL object arg)
369  {  {
370    

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26