;* ;* JAVA SYSTEM CLASSES FOR 6502 ;* .INCLUDE "global.inc" .IMPORT HMEM_ALLOC,HMEM_ALLOC_FIXED,HMEM_FREE,HMEM_LOCK,HMEM_UNLOCK .IMPORT HMEM_PTR,HMEM_REF_INC,HMEM_REF_DEC .IMPORT HSTR_HASH,STR_HASH,HSTRPL_ADD,HSTRPL_DEL .IMPORT MEMSRC,MEMDST,MEMCLR,MEMCPY .IMPORT HCLASS_DUP .IMPORT LOADCLASS_MEM .IMPORT THROW_INTERNALERR .EXPORT STRINGCLASS_INIT .SEGMENT "INIT" STRINGCLASS_INIT: LDA #STRING_CLASS_DATA JSR LOADCLASS_MEM .IFDEF DEBUG CPY #CL_STR BEQ :+ PERR "STRING CLASS NOT 3!" : .ENDIF RTS ;* ;* MIRROR CLASS FILE STRUCTURE FOR SYSTEM CLASSES ;* STRING_CLASS_DATA: .INCLUDE "string.clasm"