Commit | Line | Data |
---|---|---|
1 | # This test verifies the flow control IMP for jumping if TOS is zero. | |
2 | ||
3 | SSSTSSSSSTN | ST: Push +65 (ASCII A) | |
4 | SSSSN | ST: Push +0 | |
5 | NTSTSTSTSN | FC: BRZ -> '42' | |
6 | NNN | FC: Terminate program | |
7 | NSSVTSTSTSN | FC: Mark label '42' | |
8 | TNSS | IO: Output character | |
9 | NNN | FC: Terminate program |