antoine-source/appleworksgs/Spell/Inc/TH.H
2023-03-04 03:45:20 +01:00

1 line
761 B
C
Executable File

/* TH Error codes */
#define THNOERR 0
#define THACTIVE 1
#define THINACTIVE 2
#define THPRODOS 3
#define THBADMEAN 4
#define THNOMEM 5
/* TH calls */
extern pascal void THStartUp();
extern pascal void THShutDown();
extern pascal unsigned THWord();
extern pascal char *THInfo();
extern unsigned _THID;
extern unsigned _THErrNum[];
extern unsigned _THXVal;
extern unsigned _THActive[];
extern unsigned _SPTHID[];
#ifdef setbank
#undef setbank
#undef restorebank
#endif setbank
#define setbank asm{ phb \
phb \
lda #^_toolErr \
pha \
plb \
pla \
}
#define restorebank asm{ plb }
#ifndef SPTHID
#define SPTHID 0x0900 /* to be added to the real memory ID */
#endif