[vvhitespace] / tests / 4004_flowcontrol_jump_if_tos_is_negative.pvvs

# This test verifies the flow control IMP for jumping if TOS is negative.

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