Contents    Page-10    Prev    Next    Page+10    Index   

Examples ...


if i+j then begin i:=j; j:=3 end else k:=i .

binop 79940  OP      +,  ID      I,  ID      J
binop 80180  OP     :=,  ID      I,  ID      J
binop 80372  OP     :=,  ID      J,  NUM     3
cons  80372  OP     :=,      0  NULL
cons  80180  OP     :=,  80372  OP     :=
makeprogn
 80084  OP  progn,  80180  OP     :=
binop 80612  OP     :=,  ID      K,  ID      I
makeif
 79844  OP     if  link     0  operands 79940
 79940  OP      +  link 80084  operands 79892
 80084  OP  progn  link 80612  operands 80180
 80612  OP     :=  link     0  operands 80564
yyparse result = 0
 79844  OP     if  link     0  operands 79940
(if (+ I J)
    (progn (:= I J)
           (:= J 3))
    (:= K I))