mirror of
https://github.com/Interlisp/maiko.git
synced 2026-01-26 20:02:37 +00:00
Correct procedure declarations since N_OP_xxx function args are all LispPTRs
This commit is contained in:
@@ -1,23 +1,23 @@
|
||||
#ifndef ARITHOPSDEFS_H
|
||||
#define ARITHOPSDEFS_H 1
|
||||
#include "lispemul.h" /* for LispPTR */
|
||||
LispPTR N_OP_plus2(int tosm1, int tos);
|
||||
LispPTR N_OP_iplus2(int tosm1, int tos);
|
||||
LispPTR N_OP_difference(int tosm1, int tos);
|
||||
LispPTR N_OP_idifference(int tosm1, int tos);
|
||||
LispPTR N_OP_logxor(int tosm1, int tos);
|
||||
LispPTR N_OP_logand(int tosm1, int tos);
|
||||
LispPTR N_OP_logor(int tosm1, int tos);
|
||||
LispPTR N_OP_greaterp(int tosm1, int tos);
|
||||
LispPTR N_OP_igreaterp(int tosm1, int tos);
|
||||
LispPTR N_OP_iplusn(int tos, int n);
|
||||
LispPTR N_OP_idifferencen(int tos, int n);
|
||||
LispPTR N_OP_makenumber(int tosm1, int tos);
|
||||
LispPTR N_OP_boxiplus(int a, int tos);
|
||||
LispPTR N_OP_boxidiff(int a, int tos);
|
||||
LispPTR N_OP_times2(int tosm1, int tos);
|
||||
LispPTR N_OP_itimes2(int tosm1, int tos);
|
||||
LispPTR N_OP_quot(int tosm1, int tos);
|
||||
LispPTR N_OP_iquot(int tosm1, int tos);
|
||||
LispPTR N_OP_iremainder(int tosm1, int tos);
|
||||
LispPTR N_OP_plus2(LispPTR tosm1, LispPTR tos);
|
||||
LispPTR N_OP_iplus2(LispPTR tosm1, LispPTR tos);
|
||||
LispPTR N_OP_difference(LispPTR tosm1, LispPTR tos);
|
||||
LispPTR N_OP_idifference(LispPTR tosm1, LispPTR tos);
|
||||
LispPTR N_OP_logxor(LispPTR tosm1, LispPTR tos);
|
||||
LispPTR N_OP_logand(LispPTR tosm1, LispPTR tos);
|
||||
LispPTR N_OP_logor(LispPTR tosm1, LispPTR tos);
|
||||
LispPTR N_OP_greaterp(LispPTR tosm1, LispPTR tos);
|
||||
LispPTR N_OP_igreaterp(LispPTR tosm1, LispPTR tos);
|
||||
LispPTR N_OP_iplusn(LispPTR tos, int n);
|
||||
LispPTR N_OP_idifferencen(LispPTR tos, int n);
|
||||
LispPTR N_OP_makenumber(LispPTR tosm1, LispPTR tos);
|
||||
LispPTR N_OP_boxiplus(LispPTR a, LispPTR tos);
|
||||
LispPTR N_OP_boxidiff(LispPTR a, LispPTR tos);
|
||||
LispPTR N_OP_times2(LispPTR tosm1, LispPTR tos);
|
||||
LispPTR N_OP_itimes2(LispPTR tosm1, LispPTR tos);
|
||||
LispPTR N_OP_quot(LispPTR tosm1, LispPTR tos);
|
||||
LispPTR N_OP_iquot(LispPTR tosm1, LispPTR tos);
|
||||
LispPTR N_OP_iremainder(LispPTR tosm1, LispPTR tos);
|
||||
#endif
|
||||
|
||||
@@ -1,5 +1,5 @@
|
||||
#ifndef BINDEFS_H
|
||||
#define BINDEFS_H 1
|
||||
#include "lispemul.h" /* for LispPTR */
|
||||
LispPTR N_OP_bin(register int tos);
|
||||
LispPTR N_OP_bin(LispPTR tos);
|
||||
#endif
|
||||
|
||||
@@ -1,7 +1,7 @@
|
||||
#ifndef BITBLTDEFS_H
|
||||
#define BITBLTDEFS_H 1
|
||||
#include "lispemul.h" /* for LispPTR, DLword */
|
||||
LispPTR N_OP_pilotbitblt(LispPTR pilot_bt_tbl,int tos);
|
||||
LispPTR N_OP_pilotbitblt(LispPTR pilot_bt_tbl, LispPTR tos);
|
||||
int cursorin(DLword addrhi, DLword addrlo, int w, int h, int backward);
|
||||
#endif
|
||||
|
||||
|
||||
@@ -1,7 +1,7 @@
|
||||
#ifndef LOWLEV2DEFS_H
|
||||
#define LOWLEV2DEFS_H 1
|
||||
#include "lispemul.h" /* for LispPTR */
|
||||
LispPTR N_OP_addbase(register int base, register int offset);
|
||||
LispPTR N_OP_getbasebyte(register LispPTR base_addr, register int byteoffset);
|
||||
LispPTR N_OP_putbasebyte(register LispPTR base_addr, register int byteoffset, register int tos);
|
||||
LispPTR N_OP_addbase(LispPTR base, LispPTR offset);
|
||||
LispPTR N_OP_getbasebyte(LispPTR base_addr, LispPTR byteoffset);
|
||||
LispPTR N_OP_putbasebyte(LispPTR base_addr, LispPTR byteoffset, LispPTR tos);
|
||||
#endif
|
||||
|
||||
Reference in New Issue
Block a user