├── .gitignore ├── .gitmodules ├── .travis.yml ├── COPYING.RUNTIME ├── COPYING3 ├── Makefile ├── aforth.adb ├── aforth.gpr ├── builtins.fs ├── embed.py ├── forth-interpreter.adb ├── forth-interpreter.ads ├── forth-stacks.adb ├── forth-stacks.ads ├── forth-types.adb ├── forth-types.ads ├── forth.ads ├── gnat.adc └── t ├── Makefile ├── again.fs ├── align.fs ├── base.fs ├── bye.fs ├── compile-only.fs ├── conditionals.fs ├── create-does.fs ├── evaluate.fs ├── exit.fs ├── fetch-store.fs ├── find.fs ├── fm-mod.fs ├── include-helper.fs ├── include.fs ├── j.fs ├── leave.fs ├── loops.fs ├── parse.fs ├── picture.fs ├── recurse.fs ├── run-test.sh ├── scale-mod.fs ├── sm-rem.fs ├── stack-depth.fs ├── stack-overflow.fs ├── stack-underflow.fs ├── twodiv.fs ├── um-mod.fs ├── value.fs └── while.fs /.gitignore: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/.gitignore -------------------------------------------------------------------------------- /.gitmodules: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/.gitmodules -------------------------------------------------------------------------------- /.travis.yml: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/.travis.yml -------------------------------------------------------------------------------- /COPYING.RUNTIME: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/COPYING.RUNTIME -------------------------------------------------------------------------------- /COPYING3: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/COPYING3 -------------------------------------------------------------------------------- /Makefile: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/Makefile -------------------------------------------------------------------------------- /aforth.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/aforth.adb -------------------------------------------------------------------------------- /aforth.gpr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/aforth.gpr -------------------------------------------------------------------------------- /builtins.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/builtins.fs -------------------------------------------------------------------------------- /embed.py: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/embed.py -------------------------------------------------------------------------------- /forth-interpreter.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/forth-interpreter.adb -------------------------------------------------------------------------------- /forth-interpreter.ads: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/forth-interpreter.ads -------------------------------------------------------------------------------- /forth-stacks.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/forth-stacks.adb -------------------------------------------------------------------------------- /forth-stacks.ads: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/forth-stacks.ads -------------------------------------------------------------------------------- /forth-types.adb: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/forth-types.adb -------------------------------------------------------------------------------- /forth-types.ads: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/forth-types.ads -------------------------------------------------------------------------------- /forth.ads: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/forth.ads -------------------------------------------------------------------------------- /gnat.adc: -------------------------------------------------------------------------------- 1 | pragma Profile (Ravenscar); 2 | -------------------------------------------------------------------------------- /t/Makefile: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/Makefile -------------------------------------------------------------------------------- /t/again.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/again.fs -------------------------------------------------------------------------------- /t/align.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/align.fs -------------------------------------------------------------------------------- /t/base.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/base.fs -------------------------------------------------------------------------------- /t/bye.fs: -------------------------------------------------------------------------------- 1 | 1 . \ 1 2 | bye 3 | 2 . 4 | -------------------------------------------------------------------------------- /t/compile-only.fs: -------------------------------------------------------------------------------- 1 | then \ *** Compile only: then 2 | -------------------------------------------------------------------------------- /t/conditionals.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/conditionals.fs -------------------------------------------------------------------------------- /t/create-does.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/create-does.fs -------------------------------------------------------------------------------- /t/evaluate.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/evaluate.fs -------------------------------------------------------------------------------- /t/exit.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/exit.fs -------------------------------------------------------------------------------- /t/fetch-store.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/fetch-store.fs -------------------------------------------------------------------------------- /t/find.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/find.fs -------------------------------------------------------------------------------- /t/fm-mod.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/fm-mod.fs -------------------------------------------------------------------------------- /t/include-helper.fs: -------------------------------------------------------------------------------- 1 | 3 2 + . \ 5 2 | -------------------------------------------------------------------------------- /t/include.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/include.fs -------------------------------------------------------------------------------- /t/j.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/j.fs -------------------------------------------------------------------------------- /t/leave.fs: -------------------------------------------------------------------------------- 1 | : test 5 0 do i 3 = if leave then loop ; 2 | -------------------------------------------------------------------------------- /t/loops.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/loops.fs -------------------------------------------------------------------------------- /t/parse.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/parse.fs -------------------------------------------------------------------------------- /t/picture.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/picture.fs -------------------------------------------------------------------------------- /t/recurse.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/recurse.fs -------------------------------------------------------------------------------- /t/run-test.sh: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/run-test.sh -------------------------------------------------------------------------------- /t/scale-mod.fs: -------------------------------------------------------------------------------- 1 | 7 2 -3 */mod .s \ <2> 2 -4 2 | -------------------------------------------------------------------------------- /t/sm-rem.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/sm-rem.fs -------------------------------------------------------------------------------- /t/stack-depth.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/stack-depth.fs -------------------------------------------------------------------------------- /t/stack-overflow.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/stack-overflow.fs -------------------------------------------------------------------------------- /t/stack-underflow.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/stack-underflow.fs -------------------------------------------------------------------------------- /t/twodiv.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/twodiv.fs -------------------------------------------------------------------------------- /t/um-mod.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/um-mod.fs -------------------------------------------------------------------------------- /t/value.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/value.fs -------------------------------------------------------------------------------- /t/while.fs: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/samueltardieu/aforth/HEAD/t/while.fs --------------------------------------------------------------------------------