github.com/Interlisp.maiko
1
0
Fork 0
mirror of https://github.com/Interlisp/maiko.git synced 2026-01-18 09:02:39 +00:00
Code Issues Projects Releases Wiki Activity

Convert from LADDR_from_68k to LAddrFromNative in ubf1.c

Browse Source
This commit is contained in:
Nick Briggs 2022-08-28 18:05:45 -07:00
parent 5a3729886e
commit 1790919750
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/ubf1.c
View File

@ -9,7 +9,7 @@
#include "version.h"
#include "adr68k.h" // for LADDR_from_68k
#include "adr68k.h" // for LAddrFromNative
#include "arith.h" // for N_ARITH_SWITCH
#include "lispemul.h" // for state, ERROR_EXIT, DLword, LispPTR
#include "lspglob.h"
@ -34,7 +34,7 @@ LispPTR N_OP_ubfloat1(int arg, int alpha) {
DLword *wordp;
wordp = createcell68k(TYPE_FLOATP);
*((int *)wordp) = arg;
return (LADDR_from_68k(wordp));
return (LAddrFromNative(wordp));
}
case 1: /* unbox */
{