This commit is contained in:
Brad Nelson
2022-01-31 20:19:35 -08:00
parent 80372f9857
commit bafd230985
5 changed files with 8 additions and 12 deletions

View File

@ -390,6 +390,8 @@ e: check-phase1
check-vocabulary check-vocabulary
check-[]conds check-[]conds
check-boot check-boot
check-core-opcodes
check-float-opcodes
;e ;e
e: check-desktop e: check-desktop
@ -436,8 +438,6 @@ e: test-windows-forth-namespace
out: default-type out: default-type
out: windows out: windows
check-phase1 check-phase1
check-core-opcodes
check-float-opcodes
out: LOADLIBRARYA out: LOADLIBRARYA
out: GETPROCADDRESS out: GETPROCADDRESS
;e ;e
@ -482,8 +482,6 @@ e: test-posix-forth-namespace
out: default-type out: default-type
out: posix out: posix
check-phase1 check-phase1
check-core-opcodes
check-float-opcodes
out: DLSYM out: DLSYM
;e ;e
@ -604,9 +602,7 @@ e: test-esp32-forth-namespace
check-phase2 check-phase2
check-allocation check-allocation
check-phase1 check-phase1
check-core-opcodes
check-esp32-basics2 check-esp32-basics2
check-float-opcodes
;e ;e
[THEN] [THEN] [THEN] [THEN]

View File

@ -37,7 +37,7 @@ static cell_t ResizeFile(cell_t fd, cell_t size);
#endif #endif
#define PLATFORM_OPCODE_LIST \ #define PLATFORM_OPCODE_LIST \
FLOATING_POINT_LIST \ USER_WORDS \
REQUIRED_MEMORY_SUPPORT \ REQUIRED_MEMORY_SUPPORT \
REQUIRED_SERIAL_SUPPORT \ REQUIRED_SERIAL_SUPPORT \
REQUIRED_ARDUINO_GPIO_SUPPORT \ REQUIRED_ARDUINO_GPIO_SUPPORT \
@ -60,7 +60,7 @@ static cell_t ResizeFile(cell_t fd, cell_t size);
OPTIONAL_RMT_SUPPORT \ OPTIONAL_RMT_SUPPORT \
OPTIONAL_OLED_SUPPORT \ OPTIONAL_OLED_SUPPORT \
OPTIONAL_SPI_FLASH_SUPPORT \ OPTIONAL_SPI_FLASH_SUPPORT \
USER_WORDS FLOATING_POINT_LIST
#define REQUIRED_MEMORY_SUPPORT \ #define REQUIRED_MEMORY_SUPPORT \
Y(MALLOC, SET malloc(n0)) \ Y(MALLOC, SET malloc(n0)) \

View File

@ -23,8 +23,8 @@
static cell_t *simulated(cell_t *sp, const char *op); static cell_t *simulated(cell_t *sp, const char *op);
#define PLATFORM_OPCODE_LIST \ #define PLATFORM_OPCODE_LIST \
FLOATING_POINT_LIST \ PLATFORM_SIMULATED_OPCODE_LIST \
PLATFORM_SIMULATED_OPCODE_LIST FLOATING_POINT_LIST
#include "gen/esp32_sim_opcodes.h" #include "gen/esp32_sim_opcodes.h"

View File

@ -25,8 +25,8 @@
#define PLATFORM_OPCODE_LIST \ #define PLATFORM_OPCODE_LIST \
Y(DLSYM, tos = (cell_t) dlsym(a1, c0); --sp) \ Y(DLSYM, tos = (cell_t) dlsym(a1, c0); --sp) \
FLOATING_POINT_LIST \
CALLING_OPCODE_LIST \ CALLING_OPCODE_LIST \
FLOATING_POINT_LIST
#include "common/core.h" #include "common/core.h"
#include "common/interp.h" #include "common/interp.h"

View File

@ -40,8 +40,8 @@
tos = (cell_t) GetProcAddress((HMODULE) *sp, (LPCSTR) tos); --sp) \ tos = (cell_t) GetProcAddress((HMODULE) *sp, (LPCSTR) tos); --sp) \
Y(LOADLIBRARYA, \ Y(LOADLIBRARYA, \
tos = (cell_t) LoadLibraryA((LPCSTR) tos)) \ tos = (cell_t) LoadLibraryA((LPCSTR) tos)) \
FLOATING_POINT_LIST \
CALLING_OPCODE_LIST \ CALLING_OPCODE_LIST \
FLOATING_POINT_LIST
#include "common/core.h" #include "common/core.h"
#include "windows/interp.h" #include "windows/interp.h"