global_vars.icn:global dloadflag ,initflag ,BADflag ,aflag ,yydebug,  Mflag ,cflag ,pflag ,Lflag ,Pflag ,Tflag ,Gflag ,Vflag ,Nflag ,fflag ,Fflag ,Rflag ,OOflag ,OOOflag ,Oflag ,Xflag ,xflag ,hflag ,dbgmsg , insrtptr, rpt_lvl
global_vars.icn~:global dloadflag ,initflag ,BADflag ,aflag ,yydebug  Mflag ,cflag ,pflag ,Lflag ,Pflag ,Tflag ,Gflag ,Vflag ,Nflag ,fflag ,Fflag ,Rflag ,OOflag ,OOOflag ,Oflag ,Xflag ,xflag ,hflag ,dbgmsg , insrtptr, rpt_lvl
main.c:extern NODE * insrtptr;
main.c:    if (insrtptr == NIL) {
main.c:	if (insrtptr == NIL /* no previous initialization has taken place */) {
main.c:				      first_elmnt(bld_den_seq_f(insrtptr)) );
main.c:				      first_elmnt(bld_den_seq_f(insrtptr)) );
main.c:		    sig_out(sigfile, signature_f(insrtptr));
main.c:				      first_elmnt(bld_den_seq_f(insrtptr)) );
main.icn:    if (/insrtptr) then # no previous initialization has taken place 
main.icn:#	    insrtptr := TRUE # added DJD
main.icn:    Ggeneratepcode( ofile, stxtree,first_elmnt(bld_den_seq_f(insrtptr)) )
main.icn:    sig_out(sigfile, signature_f(insrtptr))
pass1/parser/grammar.fixed.icn: yyval := insrtptr
pass1/parser/grammar.fixed.icn:		yyval := insrtptr := mknode([BLOCKDENOTATION,emptylist(),nil])
pass1/parser/grammar.fixed.icn:		insrtptr . bld_precedence := INFINITE
pass1/parser/grammar.y:    NODE * insrtptr = NIL;  /* pointer to dummy BLOCKDENOTATION vertex into */
pass1/parser/grammar.y:	{ $$ = insrtptr; /* Remember original value */ }
pass1/parser/grammar.y:		$$ = insrtptr = mknode(BLOCKDENOTATION,emptylist(),NIL);
pass1/parser/grammar.y:		insrtptr -> bld_precedence = INFINITE;
pass1/parser/grammar.icn: yyval := insrtptr  
pass1/parser/grammar.icn:		yyval := insrtptr := mknode([BLOCKDENOTATION,emptylist(),nil])
pass1/parser/grammar.icn:		insrtptr . bld_precedence := INFINITE
pass1/parser/grammar.edit.y:	{ $$ := insrtptr  }
pass1/parser/grammar.edit.y:		$$ := insrtptr := mknode([BLOCKDENOTATION,emptylist(),nil])
pass1/parser/grammar.edit.y:		insrtptr . bld_precedence := INFINITE
pass1/parser/grammar.orig.c.y:    NODE * insrtptr = NIL;  /* pointer to dummy BLOCKDENOTATION vertex into */
pass1/parser/grammar.orig.c.y:	{ $$ = insrtptr; /* Remember original value */ }
pass1/parser/grammar.orig.c.y:		$$ = insrtptr = mknode(BLOCKDENOTATION,emptylist(),NIL);
pass1/parser/grammar.orig.c.y:		insrtptr -> bld_precedence = INFINITE;
pass1/parser/grammar.base.icn: yyval := insrtptr 
pass1/parser/grammar.indent.y:	{ $$ := insrtptr  }
pass1/parser/grammar.indent.y:		$$ := insrtptr := mknode([BLOCKDENOTATION,emptylist(),nil])
pass1/parser/grammar.indent.y:		insrtptr . bld_precedence := INFINITE
pass5c/bld_analyze.icn:extern NODE * insrtptr;     # Root of user program 
pass5c/bld_analyze.icn:		if ((iand (p . bld_flags , iand (CONTAINS_CLOSURE , CALLCC_CALL)) ~= 0) & (iand(p . bld_flags , INSIDE_LOOP) ~= 0) & is_descendant(p, insrtptr)) then {
pass5c/bld_analyze.icn:			if (is_descendant(p, insrtptr)) then {
pass5c/bld_analyze.icn:extern NODE * insrtptr;     # Root of user program 
pass5c/bld_analyze.icn:		     && is_descendant(p, insrtptr)) then {
pass5c/bld_analyze.icn:			if (is_descendant(p, insrtptr)) then {
pass5c/accessible.tmp.icn:# extern NODE * insrtptr;     # Pointer to user program
pass5c/accessible.tmp.icn:    if (has_externs = TRUE & not(is_descendant(p, insrtptr))) then {
pass5c/accessible.icn:extern NODE * insrtptr;     # Pointer to user program 
pass5c/accessible.icn:    if (has_externs = TRUE & not(is_descendant(p, insrtptr))) then {
pass5c/bld_analyze.c:extern NODE * insrtptr;     /* Root of user program */
pass5c/bld_analyze.c:		     && is_descendant(p, insrtptr)) {
pass5c/bld_analyze.c:			if (is_descendant(p, insrtptr)) {
pass5c/accessible.c:extern NODE * insrtptr;     /* Pointer to user program */
pass5c/accessible.c:    if (has_externs && !is_descendant(p, insrtptr)) {
