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

Diff of /gcl/o/block.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 29  Foundation, 675 Mass Ave, Cambridge, MA Line 29  Foundation, 675 Mass Ave, Cambridge, MA
29  #include "include.h"  #include "include.h"
30    
31  static void  static void
32  Fblock(VOL object args)  FFN(Fblock)(VOL object args)
33  {  {
34          object *oldlex = lex_env;          object *oldlex = lex_env;
35          object id;          object id;
# Line 65  Fblock(VOL object args) Line 65  Fblock(VOL object args)
65  }  }
66    
67  static void  static void
68  Freturn_from(object args)  FFN(Freturn_from)(object args)
69  {  {
70          object lex_block;          object lex_block;
71          frame_ptr fr;          frame_ptr fr;
# Line 91  Freturn_from(object args) Line 91  Freturn_from(object args)
91  }  }
92    
93  static void  static void
94  Freturn(object args)  FFN(Freturn)(object args)
95  {  {
96          object lex_block;          object lex_block;
97          frame_ptr fr;          frame_ptr fr;

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