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

Diff of /gcl/o/let.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 57  let_var_list(object var_list) Line 57  let_var_list(object var_list)
57          }          }
58  }  }
59    
60  void  static void
61  Flet(object form)  Flet(object form)
62  {  {
63    
# Line 85  Flet(object form) Line 85  Flet(object form)
85          bds_unwind(old_bds_top);          bds_unwind(old_bds_top);
86  }  }
87    
88  void  static void
89  FletA(object form)  FletA(object form)
90  {  {
91    
# Line 113  FletA(object form) Line 113  FletA(object form)
113          bds_unwind(old_bds_top);          bds_unwind(old_bds_top);
114  }  }
115    
116  void  static void
117  Fmultiple_value_bind(object form)  Fmultiple_value_bind(object form)
118  {  {
119    
# Line 167  Fmultiple_value_bind(object form) Line 167  Fmultiple_value_bind(object form)
167          bds_unwind(old_bds_top);          bds_unwind(old_bds_top);
168  }  }
169    
170  void  static void
171  Fcompiler_let(object form)  Fcompiler_let(object form)
172  {  {
173    
# Line 202  Fcompiler_let(object form) Line 202  Fcompiler_let(object form)
202          bds_unwind(old_bds_top);          bds_unwind(old_bds_top);
203  }  }
204    
205  void  static void
206  Fflet(object args)  Fflet(object args)
207  {  {
208    
# Line 235  is an illegal function definition in FLE Line 235  is an illegal function definition in FLE
235          lex_env = lex;          lex_env = lex;
236  }  }
237    
238  void  static void
239  Flabels(object args)  Flabels(object args)
240  {  {
241    
# Line 276  is an illegal function definition in LAB Line 276  is an illegal function definition in LAB
276          lex_env = lex;          lex_env = lex;
277  }  }
278    
279  void  static void
280  Fmacrolet(object args)  Fmacrolet(object args)
281  {  {
282    

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