ORCA-C/Symbol.asm
2017-10-21 18:40:19 -05:00

25 lines
521 B
NASM

mcopy symbol.macros
****************************************************************
*
* ClearTable - set the symbol table to zeros
*
* Inputs:
* table - symbol table address
*
****************************************************************
*
ClearTable private
tableSize equ 7026 sizeof(symbolTable)
subroutine (4:table),0
ldy #tableSize-2
lda #0
lb1 sta [table],Y
dey
dey
bpl lb1
return
end