aboutsummaryrefslogtreecommitdiffstats
path: root/corewords.hpp
diff options
context:
space:
mode:
authorClyne Sullivan <clyne@bitgloo.com>2023-03-08 19:57:26 -0500
committerClyne Sullivan <clyne@bitgloo.com>2023-03-08 19:57:26 -0500
commitdcd5e792b1d84afd1bea9780781674b6e6ad8dc3 (patch)
tree6b841cd741c3d8df6cb7b22f1423a5c814e0add9 /corewords.hpp
parent1960aa8773e51a76f0a5a653c8a4eb4fbef5e4ba (diff)
move libalee into folder
Diffstat (limited to 'corewords.hpp')
-rw-r--r--corewords.hpp52
1 files changed, 0 insertions, 52 deletions
diff --git a/corewords.hpp b/corewords.hpp
deleted file mode 100644
index 21a0951..0000000
--- a/corewords.hpp
+++ /dev/null
@@ -1,52 +0,0 @@
-/**
- * Alee Forth: A portable and concise Forth implementation in modern C++.
- * Copyright (C) 2023 Clyne Sullivan <clyne@bitgloo.com>
- *
- * This program is free software: you can redistribute it and/or modify
- * it under the terms of the GNU Lesser General Public License as published by
- * the Free Software Foundation, either version 3 of the License, or
- * (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU Lesser General Public License for more details.
- *
- * You should have received a copy of the GNU Lesser General Public License
- * along with this program. If not, see <https://www.gnu.org/licenses/>.
- */
-
-#ifndef ALEEFORTH_COREWORDS_HPP
-#define ALEEFORTH_COREWORDS_HPP
-
-#include "types.hpp"
-#include "state.hpp"
-
-void user_sys(State&);
-
-class CoreWords
-{
-public:
- constexpr static std::size_t WordCount = 32;
-
- constexpr static Cell Immediate = (1 << 5);
-
- constexpr static int Semicolon = 26;
-
- static int findi(const char *);
- static int findi(State&, Word);
- static void run(unsigned int, State&);
-
-private:
- constexpr static char wordsarr[] =
- "_lit\0drop\0dup\0swap\0pick\0sys\0"
- "+\0-\0m*\0_/\0_%\0"
- "_@\0_!\0>r\0r>\0=\0"
- "<\0&\0|\0^\0"
- "<<\0>>\0:\0_'\0execute\0"
- "exit\0;\0_jmp0\0_jmp\0"
- "depth\0_rdepth\0_in\0";
-};
-
-#endif // ALEEFORTH_COREWORDS_HPP
-