| OCR Text |
Show 61 atoms: I body • I body • I prim • I prim • I prim ■ i prim - I I I I I next: pri: I labl • I svar • I Jvar ■ decl: I body • I body • svr: I body < mbr: I body ■ I var < I I prim " I prim < I expr I expr im I n^ii 1 quot ,scan' »go bod/ j; begin /Scan /go bod/ j; lit 1 push 1 »scan /gO pri/ j; "fl." 1 pushl /Scan /go pri/ 1; ■w 1 pushl /Scan /9opri/ I; no» 1 pushl ,scan #go pri, 1; if /scan /go atoms, I; while /scan /go atoms, |; com ,scan ,go atoms, I; unop /Scan ,go atoms, i; aop /scan /go atoms, 1; goto /Scan /go atoms, I; A /Scan /go next/ j; ident n.ii label /scan /go atoms, /; ident A nops / /go sur/ |; tops ident ' tps /scan /go sur/ err2 |; body ident n n . / decll /$can2 /go decl, |; body ident it.» , / 1 decl2 ,scan ,go empt, err3 1; begin | /scan ,go bod, j; "C" 1 /Scan ,go bod, |; svar A | » ,go vr, |; var ar | /Scan /go atoms, I; var A | / /go pri/ |. unop prim * 1 unop / /go pri/ |; com prim A 1 popl / ,go exp, |; com prim A 1 uncom / »go exp, |; prim com | ,scan ,go atoms, 1 |
