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

Diff of /gcl/o/mapfun.c

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

revision 1.1.1.1 by wfs, Mon Dec 6 22:44:12 1999 UTC revision 1.2 by camm, Sat Jul 20 07:10:55 2002 UTC
# Line 49  Use of VS in mapfunctions: Line 49  Use of VS in mapfunctions:
49                     VS                     VS
50  */  */
51    
52  Lmapcar()  void
53    Lmapcar(void)
54  {  {
55          object endp_temp;          object endp_temp;
56    
# Line 93  LOOP: Line 94  LOOP:
94          goto LOOP;          goto LOOP;
95  }  }
96    
97  Lmaplist()  void
98    Lmaplist(void)
99  {  {
100          object endp_temp;          object endp_temp;
101    
# Line 137  LOOP: Line 139  LOOP:
139          goto LOOP;          goto LOOP;
140  }  }
141    
142  Lmapc()  void
143    Lmapc(void)
144  {  {
145          object endp_temp;          object endp_temp;
146    
# Line 177  LOOP: Line 180  LOOP:
180          goto LOOP;          goto LOOP;
181  }  }
182    
183  Lmapl()  void
184    Lmapl(void)
185  {  {
186          object endp_temp;          object endp_temp;
187    
# Line 217  LOOP: Line 221  LOOP:
221          goto LOOP;          goto LOOP;
222  }  }
223    
224  Lmapcan()  void
225    Lmapcan(void)
226  {  {
227          object endp_temp;          object endp_temp;
228    
# Line 268  LOOP: Line 273  LOOP:
273          goto LOOP;          goto LOOP;
274  }  }
275    
276  Lmapcon()  void
277    Lmapcon(void)
278  {  {
279          object endp_temp;          object endp_temp;
280    
# Line 320  LOOP: Line 326  LOOP:
326          goto LOOP;          goto LOOP;
327  }  }
328    
329  init_mapfun()  void
330    init_mapfun(void)
331  {  {
332          make_function("MAPCAR", Lmapcar);          make_function("MAPCAR", Lmapcar);
333          make_function("MAPLIST", Lmaplist);          make_function("MAPLIST", Lmaplist);

Legend:
Removed from v.1.1.1.1  
changed lines
  Added in v.1.2

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