mirror of
https://github.com/Interlisp/maiko.git
synced 2026-02-18 05:24:05 +00:00
Remove unnecessary codepaths for ISC. (#230)
ISC support had some extra code paths that were largely duplicates of what was for non-ISC. They are not needed any longer.
This commit is contained in:
13
src/xc.c
13
src/xc.c
@@ -197,20 +197,15 @@ void dispatch(void) {
|
||||
InstPtr *table;
|
||||
#else
|
||||
#if defined(OPDISP) || defined(SPARCDISP)
|
||||
#ifdef ISC
|
||||
InstPtr *table;
|
||||
#else
|
||||
register InstPtr *table;
|
||||
#endif
|
||||
#endif /* OPDISP */
|
||||
#endif /* I386 */
|
||||
|
||||
#ifdef ISC
|
||||
#elif (DOS && OPDISP)
|
||||
#if (DOS && OPDISP)
|
||||
#else
|
||||
register LispPTR *cspcache;
|
||||
register LispPTR tscache;
|
||||
#endif /* ISC */
|
||||
#endif
|
||||
|
||||
#ifdef sparc
|
||||
register struct state *stateptrcache = MState;
|
||||
@@ -286,11 +281,7 @@ void dispatch(void) {
|
||||
UFN_CALLS;
|
||||
|
||||
op_ufn : {
|
||||
#ifdef ISC
|
||||
UFN *entry68k;
|
||||
#else
|
||||
register UFN *entry68k;
|
||||
#endif
|
||||
entry68k = (UFN *)GetUFNEntry(Get_BYTE_PCMAC0);
|
||||
fn_num_args = entry68k->arg_num;
|
||||
fn_opcode_size = entry68k->byte_num + 1;
|
||||
|
||||
Reference in New Issue
Block a user