;; push2-examples-output ;; This shows the output from the examples in push2-examples.lisp. ;; ;; This was generated by adding "(terpri) (terpri)" after each (print-stacks) in ;; push2-examples.lisp, doing a (trace runpush), and then evaluating everything. Calling (RUNPUSH (5 INTEGER.DUP)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((5 INTEGER.DUP)) BOOLEAN STACK: NIL INTEGER STACK: (5 5) Calling (RUNPUSH (TRUE FALSE BOOLEAN.DUP)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((TRUE FALSE BOOLEAN.DUP)) BOOLEAN STACK: (FALSE FALSE TRUE) INTEGER STACK: NIL Calling (RUNPUSH (5 INTEGER.POP)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((5 INTEGER.POP)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (5 6 INTEGER.SWAP)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((5 6 INTEGER.SWAP)) BOOLEAN STACK: NIL INTEGER STACK: (5 6) Calling (RUNPUSH (5 6 INTEGER.=)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((5 6 INTEGER.=)) BOOLEAN STACK: (FALSE) INTEGER STACK: NIL Calling (RUNPUSH (5 5 INTEGER.=)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((5 5 INTEGER.=)) BOOLEAN STACK: (TRUE) INTEGER STACK: NIL Calling (RUNPUSH (5 X INTEGER.SET)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((5 X INTEGER.SET)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (5 X INTEGER.SET X INTEGER.GET)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((5 X INTEGER.SET X INTEGER.GET)) BOOLEAN STACK: NIL INTEGER STACK: (5) Calling (RUNPUSH (1 2 3 4 5 1 INTEGER.YANK)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((1 2 3 4 5 1 INTEGER.YANK)) BOOLEAN STACK: NIL INTEGER STACK: (4 5 3 2 1) Calling (RUNPUSH (1 2 3 4 5 4 INTEGER.YANK)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((1 2 3 4 5 4 INTEGER.YANK)) BOOLEAN STACK: NIL INTEGER STACK: (1 5 4 3 2) Calling (RUNPUSH (1 2 3 4 5 -21 INTEGER.YANK)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((1 2 3 4 5 -21 INTEGER.YANK)) BOOLEAN STACK: NIL INTEGER STACK: (5 4 3 2 1) Calling (RUNPUSH (1 2 3 4 5 21 INTEGER.YANK)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((1 2 3 4 5 21 INTEGER.YANK)) BOOLEAN STACK: NIL INTEGER STACK: (1 5 4 3 2) Calling (RUNPUSH (FALSE TRUE FALSE 1 BOOLEAN.YANK)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((FALSE TRUE FALSE 1 BOOLEAN.YANK)) BOOLEAN STACK: (TRUE FALSE FALSE) INTEGER STACK: NIL Calling (RUNPUSH (FALSE TRUE FALSE 0 BOOLEAN.YANK)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((FALSE TRUE FALSE 0 BOOLEAN.YANK)) BOOLEAN STACK: (FALSE TRUE FALSE) INTEGER STACK: NIL Calling (RUNPUSH (FALSE TRUE FALSE -120 BOOLEAN.YANK)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((FALSE TRUE FALSE -120 BOOLEAN.YANK)) BOOLEAN STACK: (FALSE TRUE FALSE) INTEGER STACK: NIL Calling (RUNPUSH (FALSE TRUE FALSE 120 BOOLEAN.YANK)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((FALSE TRUE FALSE 120 BOOLEAN.YANK)) BOOLEAN STACK: (FALSE FALSE TRUE) INTEGER STACK: NIL Calling (RUNPUSH (1 2 3 4 5 1 INTEGER.YANKDUP)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((1 2 3 4 5 1 INTEGER.YANKDUP)) BOOLEAN STACK: NIL INTEGER STACK: (4 5 4 3 2 1) Calling (RUNPUSH (1 2 3 4 5 4 INTEGER.YANKDUP)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((1 2 3 4 5 4 INTEGER.YANKDUP)) BOOLEAN STACK: NIL INTEGER STACK: (1 5 4 3 2 1) Calling (RUNPUSH (1 2 3 4 5 -21 INTEGER.YANKDUP)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((1 2 3 4 5 -21 INTEGER.YANKDUP)) BOOLEAN STACK: NIL INTEGER STACK: (5 5 4 3 2 1) Calling (RUNPUSH (1 2 3 4 5 21 INTEGER.YANKDUP)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((1 2 3 4 5 21 INTEGER.YANKDUP)) BOOLEAN STACK: NIL INTEGER STACK: (1 5 4 3 2 1) Calling (RUNPUSH (FALSE TRUE FALSE -120 BOOLEAN.YANKDUP)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((FALSE TRUE FALSE -120 BOOLEAN.YANKDUP)) BOOLEAN STACK: (FALSE FALSE TRUE FALSE) INTEGER STACK: NIL Calling (RUNPUSH (FALSE TRUE FALSE 120 BOOLEAN.YANKDUP)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((FALSE TRUE FALSE 120 BOOLEAN.YANKDUP)) BOOLEAN STACK: (FALSE FALSE TRUE FALSE) INTEGER STACK: NIL Calling (RUNPUSH (FALSE TRUE FALSE 1 BOOLEAN.YANKDUP)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((FALSE TRUE FALSE 1 BOOLEAN.YANKDUP)) BOOLEAN STACK: (TRUE FALSE TRUE FALSE) INTEGER STACK: NIL Calling (RUNPUSH (1 2 3 4 5 1 INTEGER.SHOVE)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((1 2 3 4 5 1 INTEGER.SHOVE)) BOOLEAN STACK: NIL INTEGER STACK: (4 5 3 2 1) Calling (RUNPUSH (1 2 3 4 5 -100 INTEGER.SHOVE)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((1 2 3 4 5 -100 INTEGER.SHOVE)) BOOLEAN STACK: NIL INTEGER STACK: (5 4 3 2 1) Calling (RUNPUSH (1 2 3 4 5 100 INTEGER.SHOVE)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((1 2 3 4 5 100 INTEGER.SHOVE)) BOOLEAN STACK: NIL INTEGER STACK: (4 3 2 1 5) Calling (RUNPUSH (1 2 3 4 5 4 INTEGER.SHOVE)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((1 2 3 4 5 4 INTEGER.SHOVE)) BOOLEAN STACK: NIL INTEGER STACK: (4 3 2 1 5) Calling (RUNPUSH (TRUE FALSE TRUE 0 BOOLEAN.SHOVE)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((TRUE FALSE TRUE 0 BOOLEAN.SHOVE)) BOOLEAN STACK: (TRUE FALSE TRUE) INTEGER STACK: NIL Calling (RUNPUSH (TRUE FALSE TRUE 1 BOOLEAN.SHOVE)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((TRUE FALSE TRUE 1 BOOLEAN.SHOVE)) BOOLEAN STACK: (FALSE TRUE TRUE) INTEGER STACK: NIL Calling (RUNPUSH (INTEGER.RAND)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((INTEGER.RAND)) BOOLEAN STACK: NIL INTEGER STACK: (1) Calling (RUNPUSH (BOOLEAN.RAND)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((BOOLEAN.RAND)) BOOLEAN STACK: (TRUE) INTEGER STACK: NIL Calling (RUNPUSH (NAME.RAND)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: (PUSH-VAR-2) CODE STACK: ((NAME.RAND)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (10 CODE.RAND)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.CONTAINER BOOLEAN.AND (CODE.GET FLOAT.YANK CODE.LENGTH)) (10 CODE.RAND)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (TRUE TRUE TRUE TRUE TRUE BOOLEAN.STACKDEPTH)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((TRUE TRUE TRUE TRUE TRUE BOOLEAN.STACKDEPTH)) BOOLEAN STACK: (TRUE TRUE TRUE TRUE TRUE) INTEGER STACK: (5) Calling (RUNPUSH (1 2 3 4 5 INTEGER.STACKDEPTH)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((1 2 3 4 5 INTEGER.STACKDEPTH)) BOOLEAN STACK: NIL INTEGER STACK: (5 5 4 3 2 1) Calling (RUNPUSH (CODE.QUOTE (FOO BAR))) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((FOO BAR) (CODE.QUOTE (FOO BAR))) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (FOO BAR) CODE.ATOM)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.QUOTE (FOO BAR) CODE.ATOM)) BOOLEAN STACK: (FALSE) INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE NIL CODE.ATOM)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.QUOTE NIL CODE.ATOM)) BOOLEAN STACK: (TRUE) INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE 22 CODE.ATOM)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.QUOTE 22 CODE.ATOM)) BOOLEAN STACK: (TRUE) INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (FOO BAR) CODE.NULL)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.QUOTE (FOO BAR) CODE.NULL)) BOOLEAN STACK: (FALSE) INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE NIL CODE.NULL)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.QUOTE NIL CODE.NULL)) BOOLEAN STACK: (TRUE) INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE 22 CODE.NULL)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.QUOTE 22 CODE.NULL)) BOOLEAN STACK: (FALSE) INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (FOO BAR BAZ) CODE.CAR)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: (FOO (CODE.QUOTE (FOO BAR BAZ) CODE.CAR)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (FOO BAR BAZ) CODE.CDR)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((BAR BAZ) (CODE.QUOTE (FOO BAR BAZ) CODE.CDR)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE BONK CODE.QUOTE (FOO BAR BAZ) CODE.CONS)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((BONK FOO BAR BAZ) (CODE.QUOTE BONK CODE.QUOTE (FOO BAR BAZ) CODE.CONS)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE BONK CODE.QUOTE FOO CODE.CONS)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((BONK FOO) (CODE.QUOTE BONK CODE.QUOTE FOO CODE.CONS)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.INSTRUCTIONS)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.INSTRUCTIONS)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (CODE.QUOTE (FOO BAR BAZ) CODE.CAR) CODE.DO*)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: (FOO (CODE.QUOTE (CODE.QUOTE (FOO BAR BAZ) CODE.CAR) CODE.DO*)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE NAME.RAND CODE.QUOTE INTEGER.RAND TRUE CODE.IF)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: (PUSH-VAR-3) CODE STACK: ((CODE.QUOTE NAME.RAND CODE.QUOTE INTEGER.RAND TRUE CODE.IF)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE NAME.RAND CODE.QUOTE INTEGER.RAND FALSE CODE.IF)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.QUOTE NAME.RAND CODE.QUOTE INTEGER.RAND FALSE CODE.IF)) BOOLEAN STACK: NIL INTEGER STACK: (-2) Calling (RUNPUSH (CODE.NOOP)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.NOOP)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE FOO CODE.QUOTE BAR CODE.LIST)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((FOO BAR) (CODE.QUOTE FOO CODE.QUOTE BAR CODE.LIST)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (FOO) CODE.QUOTE (BAR) CODE.APPEND)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((FOO BAR) (CODE.QUOTE (FOO) CODE.QUOTE (BAR) CODE.APPEND)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE FOO CODE.QUOTE BAR CODE.APPEND)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((FOO BAR) (CODE.QUOTE FOO CODE.QUOTE BAR CODE.APPEND)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (A B C D) 2 CODE.NTH)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: (C (CODE.QUOTE (A B C D) 2 CODE.NTH)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (A B C D) 2000 CODE.NTH)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: (A (CODE.QUOTE (A B C D) 2000 CODE.NTH)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (A B C D) 2 CODE.NTHCDR)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((C D) (CODE.QUOTE (A B C D) 2 CODE.NTHCDR)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (A B C D) 2000 CODE.NTHCDR)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((A B C D) (CODE.QUOTE (A B C D) 2000 CODE.NTHCDR)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (A B) CODE.QUOTE (X (A B) Y) CODE.MEMBER)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.QUOTE (A B) CODE.QUOTE (X (A B) Y) CODE.MEMBER)) BOOLEAN STACK: (TRUE) INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (A B) CODE.QUOTE (X (A X) Y) CODE.MEMBER)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.QUOTE (A B) CODE.QUOTE (X (A X) Y) CODE.MEMBER)) BOOLEAN STACK: (FALSE) INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (A B) CODE.QUOTE (X (A B) Y) CODE.POSITION)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.QUOTE (A B) CODE.QUOTE (X (A B) Y) CODE.POSITION)) BOOLEAN STACK: NIL INTEGER STACK: (1) Calling (RUNPUSH (CODE.QUOTE (A B) CODE.QUOTE (X (A X) Y) CODE.POSITION)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.QUOTE (A B) CODE.QUOTE (X (A X) Y) CODE.POSITION)) BOOLEAN STACK: NIL INTEGER STACK: (-1) Calling (RUNPUSH (CODE.QUOTE (A) CODE.QUOTE (X (B (A))) CODE.CONTAINS)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((A) (CODE.QUOTE (A) CODE.QUOTE (X (B (A))) CODE.CONTAINS)) BOOLEAN STACK: (TRUE) INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (A) CODE.QUOTE (X (B (Z))) CODE.CONTAINS)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((A) (CODE.QUOTE (A) CODE.QUOTE (X (B (Z))) CODE.CONTAINS)) BOOLEAN STACK: (FALSE) INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (X Y Z) CODE.QUOTE A 0 CODE.INSERT)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: (A (CODE.QUOTE (X Y Z) CODE.QUOTE A 0 CODE.INSERT)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (X Y Z) CODE.QUOTE A 1 CODE.INSERT)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((A Y Z) (CODE.QUOTE (X Y Z) CODE.QUOTE A 1 CODE.INSERT)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (X Y Z) CODE.QUOTE A 3 CODE.INSERT)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((X Y A) (CODE.QUOTE (X Y Z) CODE.QUOTE A 3 CODE.INSERT)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (X (Y) Z) 0 CODE.EXTRACT)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((X (Y) Z) (CODE.QUOTE (X (Y) Z) 0 CODE.EXTRACT)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (X (Y) Z) 1 CODE.EXTRACT)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: (X (CODE.QUOTE (X (Y) Z) 1 CODE.EXTRACT)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (X (Y) Z) 2 CODE.EXTRACT)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((Y) (CODE.QUOTE (X (Y) Z) 2 CODE.EXTRACT)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (X (Y) Z) 3 CODE.EXTRACT)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: (Y (CODE.QUOTE (X (Y) Z) 3 CODE.EXTRACT)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (X (Y) Z) 5 CODE.EXTRACT)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((X (Y) Z) (CODE.QUOTE (X (Y) Z) 5 CODE.EXTRACT)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.LENGTH)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: NIL BOOLEAN STACK: NIL INTEGER STACK: (1) Calling (RUNPUSH (CODE.QUOTE (A B C) CODE.SIZE)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.QUOTE (A B C) CODE.SIZE)) BOOLEAN STACK: NIL INTEGER STACK: (4) Calling (RUNPUSH (CODE.QUOTE (CODE.QUOTE (FOO BAR BAZ) CODE.CAR) CODE.DO)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.QUOTE (FOO BAR BAZ) CODE.CAR) (CODE.QUOTE (CODE.QUOTE (FOO BAR BAZ) CODE.CAR) CODE.DO)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (TRUE FALSE) CODE.DO)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.QUOTE (TRUE FALSE) CODE.DO)) BOOLEAN STACK: (FALSE TRUE) INTEGER STACK: NIL Calling (RUNPUSH (2 3 INTEGER.+)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((2 3 INTEGER.+)) BOOLEAN STACK: NIL INTEGER STACK: (5) Calling (RUNPUSH (5 2 INTEGER.-)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((5 2 INTEGER.-)) BOOLEAN STACK: NIL INTEGER STACK: (3) Calling (RUNPUSH (2 3 INTEGER.*)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((2 3 INTEGER.*)) BOOLEAN STACK: NIL INTEGER STACK: (6) Calling (RUNPUSH (10 3 INTEGER./)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((10 3 INTEGER./)) BOOLEAN STACK: NIL INTEGER STACK: (3) Calling (RUNPUSH (10 0 INTEGER./)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((10 0 INTEGER./)) BOOLEAN STACK: NIL INTEGER STACK: (0) Calling (RUNPUSH (10 3 INTEGER.%)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((10 3 INTEGER.%)) BOOLEAN STACK: NIL INTEGER STACK: (1) Calling (RUNPUSH (10 0 INTEGER.%)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((10 0 INTEGER.%)) BOOLEAN STACK: NIL INTEGER STACK: (0) Calling (RUNPUSH (10 3 INTEGER.MIN)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((10 3 INTEGER.MIN)) BOOLEAN STACK: NIL INTEGER STACK: (3) Calling (RUNPUSH (10 3 INTEGER.MAX)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((10 3 INTEGER.MAX)) BOOLEAN STACK: NIL INTEGER STACK: (10) Calling (RUNPUSH (10 5 INTEGER.<)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((10 5 INTEGER.<)) BOOLEAN STACK: (FALSE) INTEGER STACK: NIL Calling (RUNPUSH (5 10 INTEGER.<)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((5 10 INTEGER.<)) BOOLEAN STACK: (TRUE) INTEGER STACK: NIL Calling (RUNPUSH (10 5 INTEGER.>)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((10 5 INTEGER.>)) BOOLEAN STACK: (TRUE) INTEGER STACK: NIL Calling (RUNPUSH (5 10 INTEGER.>)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((5 10 INTEGER.>)) BOOLEAN STACK: (FALSE) INTEGER STACK: NIL Calling (RUNPUSH (FALSE TRUE BOOLEAN.OR FALSE BOOLEAN.NOT BOOLEAN.AND)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((FALSE TRUE BOOLEAN.OR FALSE BOOLEAN.NOT BOOLEAN.AND)) BOOLEAN STACK: (TRUE) INTEGER STACK: NIL Calling (RUNPUSH (FALSE TRUE BOOLEAN.AND FALSE BOOLEAN.NOT BOOLEAN.AND)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((FALSE TRUE BOOLEAN.AND FALSE BOOLEAN.NOT BOOLEAN.AND)) BOOLEAN STACK: (FALSE) INTEGER STACK: NIL Calling (RUNPUSH (FALSE TRUE BOOLEAN.OR TRUE BOOLEAN.NOT BOOLEAN.AND)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((FALSE TRUE BOOLEAN.OR TRUE BOOLEAN.NOT BOOLEAN.AND)) BOOLEAN STACK: (FALSE) INTEGER STACK: NIL Calling (RUNPUSH (FOO 99 INTEGER.SET BAR 33 INTEGER.SET NAME.RANDBOUNDNAME)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: (FOO) CODE STACK: ((FOO 99 INTEGER.SET BAR 33 INTEGER.SET NAME.RANDBOUNDNAME)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (FOO) CODE.QUOTE (BAR) CODE.QUOTE (BING (BAR) BIZ ((BAR))) CODE.SUBST)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((BING (FOO) BIZ ((FOO))) (CODE.QUOTE (FOO) CODE.QUOTE (BAR) CODE.QUOTE (BING (BAR) BIZ ((BAR))) CODE.SUBST)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (BAZ) CODE.QUOTE (FOO (BAR (BAZ))) CODE.CONTAINER)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((BAR (BAZ)) (CODE.QUOTE (BAZ) CODE.QUOTE (FOO (BAR (BAZ))) CODE.CONTAINER)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (A) CODE.QUOTE (X (B (A))) CODE.CONTAINER)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((B (A)) (CODE.QUOTE (A) CODE.QUOTE (X (B (A))) CODE.CONTAINER)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (A) CODE.QUOTE (X (B (Z))) CODE.CONTAINER)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: (NIL (CODE.QUOTE (A) CODE.QUOTE (X (B (Z))) CODE.CONTAINER)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (CODE.QUOTE (FOO (BAR BAZ)) CODE.QUOTE (FOO (BAR BING)) CODE.DISCREPANCY)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.QUOTE (FOO (BAR BAZ)) CODE.QUOTE (FOO (BAR BING)) CODE.DISCREPANCY)) BOOLEAN STACK: NIL INTEGER STACK: (6) Calling (RUNPUSH (1.2 FLOAT.SIN 2.3 FLOAT.COS 4.5 FLOAT.TAN FLOAT.+ FLOAT.*)) RUNPUSH returned 0 values : FLOAT STACK: (3.701179435574878) NAME STACK: NIL CODE STACK: ((1.2 FLOAT.SIN 2.3 FLOAT.COS 4.5 FLOAT.TAN FLOAT.+ FLOAT.*)) BOOLEAN STACK: NIL INTEGER STACK: NIL Calling (RUNPUSH (INTEGER.DUP INTEGER.+) (5)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((INTEGER.DUP INTEGER.+)) BOOLEAN STACK: NIL INTEGER STACK: (10) Calling (RUNPUSH (CODE.QUOTE (INTEGER.DUP INTEGER.+) CODE.DO) (5)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.QUOTE (INTEGER.DUP INTEGER.+) CODE.DO)) BOOLEAN STACK: NIL INTEGER STACK: (10) Calling (RUNPUSH (CODE.QUOTE (CODE.QUOTE (INTEGER.POP 1) CODE.QUOTE (CODE.DUP INTEGER.DUP 1 INTEGER.- CODE.DO INTEGER.*) INTEGER.DUP 2 INTEGER.< CODE.IF) CODE.DO) (5)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.QUOTE (CODE.QUOTE (INTEGER.POP 1) CODE.QUOTE (CODE.DUP INTEGER.DUP 1 INTEGER.- CODE.DO INTEGER.*) INTEGER.DUP 2 INTEGER.< CODE.IF) CODE.DO)) BOOLEAN STACK: NIL INTEGER STACK: (120) Calling (RUNPUSH (CODE.QUOTE (INTEGER.POP 1) CODE.QUOTE (CODE.DUP INTEGER.DUP 1 INTEGER.- CODE.DO INTEGER.*) INTEGER.DUP 2 INTEGER.< CODE.IF) (5)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.QUOTE (INTEGER.POP 1) CODE.QUOTE (CODE.DUP INTEGER.DUP 1 INTEGER.- CODE.DO INTEGER.*) INTEGER.DUP 2 INTEGER.< CODE.IF)) BOOLEAN STACK: NIL INTEGER STACK: (120) Calling (RUNPUSH (FACTORIAL CODE.QUOTE (CODE.QUOTE (INTEGER.POP 1) CODE.QUOTE (INTEGER.DUP 1 INTEGER.- FACTORIAL CODE.GET CODE.DO INTEGER.*) INTEGER.DUP 2 INTEGER.< CODE.IF) CODE.DUP CODE.SET CODE.DO) (5)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((FACTORIAL CODE.QUOTE (CODE.QUOTE (INTEGER.POP 1) CODE.QUOTE (INTEGER.DUP 1 INTEGER.- FACTORIAL CODE.GET CODE.DO INTEGER.*) INTEGER.DUP 2 INTEGER.< CODE.IF) CODE.DUP CODE.SET CODE.DO)) BOOLEAN STACK: NIL INTEGER STACK: (120) Calling (RUNPUSH (CODE.QUOTE (CODE.QUOTE (INTEGER.POP 1) CODE.QUOTE (INTEGER.DUP 1 INTEGER.- FACTORIAL CODE.GET CODE.DO INTEGER.*) INTEGER.DUP 2 INTEGER.< CODE.IF) FACTORIAL CODE.SET FACTORIAL CODE.GET CODE.DO) (5)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.QUOTE (CODE.QUOTE (INTEGER.POP 1) CODE.QUOTE (INTEGER.DUP 1 INTEGER.- FACTORIAL CODE.GET CODE.DO INTEGER.*) INTEGER.DUP 2 INTEGER.< CODE.IF) FACTORIAL CODE.SET FACTORIAL CODE.GET CODE.DO)) BOOLEAN STACK: NIL INTEGER STACK: (120) Calling (RUNPUSH (FACTORIAL CODE.QUOTE (ARG INTEGER.GET CODE.QUOTE (INTEGER.POP 1) CODE.QUOTE (INTEGER.DUP 1 INTEGER.- FACTORIAL CODE.GET ARG INTEGER.SET CODE.DO INTEGER.*) INTEGER.DUP 2 INTEGER.< CODE.IF) CODE.SET CODE.POP ARG INTEGER.SET FACTORIAL CODE.GET CODE.DO) (5)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: NIL BOOLEAN STACK: NIL INTEGER STACK: (120) Calling (RUNPUSH (CODE.QUOTE (CODE.QUOTE (INTEGER.POP 1) CODE.QUOTE (CODE.DUP INTEGER.DUP 1 INTEGER.- CODE.DO INTEGER.*) INTEGER.DUP 2 INTEGER.< CODE.IF) CODE.DO INTEGER.RAND INTEGER.RAND CODE.RAND CODE.INSERT) (5)) RUNPUSH returned 0 values : FLOAT STACK: NIL NAME STACK: NIL CODE STACK: ((CODE.QUOTE (CODE.QUOTE (INTEGER.POP 1) CODE.QUOTE CODE.DUP INTEGER.DUP 2 INTEGER.< CODE.IF) CODE.DO INTEGER.RAND INTEGER.RAND CODE.RAND CODE.INSERT)) BOOLEAN STACK: NIL INTEGER STACK: (120) Calling (RUNPUSH (CODE.QUOTE (CODE.QUOTE (FLOAT.POP 1.0) CODE.QUOTE (CODE.DUP FLOAT.DUP 1.0 FLOAT.- CODE.DO FLOAT.*) FLOAT.DUP 2.0 FLOAT.< CODE.IF) CODE.DO) (5.0)) RUNPUSH returned 0 values : FLOAT STACK: (120.0) NAME STACK: NIL CODE STACK: ((CODE.QUOTE (CODE.QUOTE (FLOAT.POP 1.0) CODE.QUOTE (CODE.DUP FLOAT.DUP 1.0 FLOAT.- CODE.DO FLOAT.*) FLOAT.DUP 2.0 FLOAT.< CODE.IF) CODE.DO)) BOOLEAN STACK: NIL INTEGER STACK: NIL