ack/util/ceg/defaults/pseudo/C_end.c

25 lines
319 B
C
Raw Normal View History

#define CODE_EXPANDER
1987-11-20 10:41:03 +00:00
#include <em.h>
#include "back.h"
1989-01-26 13:24:23 +00:00
extern int B_locals_created;
extern int B_procno;
1987-11-20 10:41:03 +00:00
1993-11-10 15:07:12 +00:00
void
1987-11-20 10:41:03 +00:00
C_end( l)
arith l;
{
char *p;
swtxt();
1989-01-26 13:24:23 +00:00
if ( !B_locals_created) {
p = extnd_pro( B_procno);
1987-11-20 10:41:03 +00:00
symbol_definition( p);
set_local_visible( p);
C_locals( l);
C_jump( extnd_start( B_procno));
1987-11-20 10:41:03 +00:00
}
}