1
0
mirror of https://github.com/Interlisp/maiko.git synced 2026-01-14 07:30:21 +00:00

Replace Addr68k related macros with NativeAligned inline functions

This commit is contained in:
Nick Briggs 2022-09-01 14:15:37 -07:00
parent b7b364359b
commit cc6e8b6986

View File

@ -240,8 +240,8 @@ LispPTR mess_read(LispPTR *args)
SETJMP(NIL);
/* Get buff address from LISP */
naddress = (LispPTR *)(Addr68k_from_LADDR(args[0]));
base = (char *)(Addr68k_from_LADDR(((OneDArray *)naddress)->base));
naddress = (LispPTR *)(NativeAligned4FromLAddr(args[0]));
base = (char *)(NativeAligned2FromLAddr(((OneDArray *)naddress)->base));
close(log_id);
TIMEOUT(log_id = open(logfile, O_RDONLY));