From 56760f0517c646f41dd179e1f365d3268df3ec50 Mon Sep 17 00:00:00 2001 From: Clyne Sullivan Date: Thu, 9 Feb 2023 10:30:55 -0500 Subject: initial commit --- memdict.hpp | 42 ++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 42 insertions(+) create mode 100644 memdict.hpp (limited to 'memdict.hpp') diff --git a/memdict.hpp b/memdict.hpp new file mode 100644 index 0000000..8606da2 --- /dev/null +++ b/memdict.hpp @@ -0,0 +1,42 @@ +/** + * Alee Forth: A portable and concise Forth implementation in modern C++. + * Copyright (C) 2023 Clyne Sullivan + * + * 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 . + */ + +#ifndef ALEEFORTH_MEMDICT_HPP +#define ALEEFORTH_MEMDICT_HPP + +#include "dictionary.hpp" + +constexpr unsigned long int MemDictSize = 4096; + +class MemDict : public Dictionary +{ + Cell dict[MemDictSize]; + +public: + virtual Cell read(Addr addr) const final { + return dict[addr]; + } + + virtual int write(Addr addr, Cell value) final { + dict[addr] = value; + return 0; + } +}; + +#endif // ALEEFORTH_MEMDICT_HPP + -- cgit v1.2.3