Added first two functions to stdlib.
[vvhitespace] / stdlib / stdio.pvvs
################################################################################
# Description:
# This function prints a null-terminated string from the stack.
# Call Stack:
# null-terminator (ASCII '\0')
# char n
# ...
# char 2
# char 1 <-- TOS
# Return Stack:
# <empty>
################################################################################
NSSVTSSSN | Mark: 1000 (print string from stack)
SNS | DUP
NTSSSSSTSSSSSSSSSSTN | BRZ > 00001000 00000001
TNSS | Print character
NSNTSSSN | JMP > 1000
NSSVSSSSTSSSSSSSSSSTN | Mark: 00001000 00000001
SNN | DROP
NTN | RTS
################################################################################
# Description:
# This function prints a null-terminated string from the heap.
# Call Stack:
# pointer to first character <-- TOS
# Return Stack:
# <empty>
################################################################################
NSSVTSSTN | Mark: 1001 (print string from heap)
SNS | DUP
TTT | LOAD
SNS | DUP
NTSSSSSTSSTSSSSSSSTN | BRZ > 00001001 00000001
TNSS | Print character
SSSTN | Push +1
TSSS | ADD
NSNTSSTN | JMP > 1001
NSSVSSSSTSSTSSSSSSSTN | Mark: 00001001 00000001
SNN | DROP
SNN | DROP
NTN | RTS