pointer and cast cleanup

1 files changed, 1 insertions, 0 deletions

diff --git a/main.cpp b/main.cpp
index 16de440..d3bbe42 100644
--- a/main.cpp
+++ b/main.cpp
@@ -38,6 +38,7 @@ int main(int argc, const char *argv[])
         std::cout << buf << ' ';
     });
     fth->add("emit", [](auto) { std::cout << static_cast<char>(fth->pop()); });
+    fth->add("dictsize", [](auto) { fth->push(dict.size() * sizeof(forth::cell)); });
 
     for (auto arg : args) {
         if (std::ifstream file {arg}; parse_stream(fth, file))