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

Diff of /gcl/o/conditional.c

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

revision 1.4.6.1 by camm, Sun Sep 14 02:30:45 2003 UTC revision 1.4.6.2 by camm, Thu Nov 6 16:16:50 2003 UTC
# Line 31  Foundation, 675 Mass Ave, Cambridge, MA Line 31  Foundation, 675 Mass Ave, Cambridge, MA
31  object sLotherwise;  object sLotherwise;
32    
33  static void  static void
34  Fif(object form)  FFN(Fif)(object form)
35  {  {
36    
37          object *top = vs_top;          object *top = vs_top;
# Line 56  Fif(object form) Line 56  Fif(object form)
56  }  }
57    
58  static void  static void
59  Fcond(object args)  FFN(Fcond)(object args)
60  {  {
61    
62          object *top = vs_top;          object *top = vs_top;
# Line 89  Fcond(object args) Line 89  Fcond(object args)
89  }  }
90    
91  static void  static void
92  Fcase(object arg)  FFN(Fcase)(object arg)
93  {  {
94    
95          object *top = vs_top;          object *top = vs_top;
# Line 139  FOUND: Line 139  FOUND:
139  }  }
140    
141  static void  static void
142  Fwhen(object form)  FFN(Fwhen)(object form)
143  {  {
144    
145          object *top = vs_top;          object *top = vs_top;
# Line 165  Fwhen(object form) Line 165  Fwhen(object form)
165  }  }
166    
167  static void  static void
168  Funless(object form)  FFN(Funless)(object form)
169  {  {
170    
171          object *top = vs_top;          object *top = vs_top;

Legend:
Removed from v.1.4.6.1  
changed lines
  Added in v.1.4.6.2

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