From 2ece0e4993c838f620e5c19dfa04a86d9d35df49 Mon Sep 17 00:00:00 2001 From: Clyne Sullivan Date: Thu, 2 Mar 2023 18:01:34 -0500 Subject: major compliance refactor; undo packed literals for now --- dictionary.hpp | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'dictionary.hpp') diff --git a/dictionary.hpp b/dictionary.hpp index 1321875..48d4e1b 100644 --- a/dictionary.hpp +++ b/dictionary.hpp @@ -31,10 +31,11 @@ public: constexpr static Addr Here = sizeof(Cell); constexpr static Addr Latest = sizeof(Cell) * 2; constexpr static Addr Compiling = sizeof(Cell) * 3; - constexpr static Addr Postpone = sizeof(Cell) * 4; - constexpr static Addr Input = sizeof(Cell) * 5; // len data... + constexpr static Addr Input = sizeof(Cell) * 4; // len data... constexpr static Addr InputCells = 80; // bytes! - constexpr static Addr Begin = sizeof(Cell) * 6 + InputCells; + constexpr static Addr Begin = sizeof(Cell) * 5 + InputCells; + + void initialize(); Addr here() const noexcept { return read(Here); } void here(Addr l) noexcept { write(Here, l); } -- cgit v1.2.3