kyle
/
sandbox
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

misc/kforth: Store proper dictionary address.

This commit is contained in:
Kyle Isom 2018-03-01 19:40:49 -08:00
parent 5788c52ff3
commit 342bacdf01
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
dict.cc
View File

@ -1629,7 +1629,7 @@ init_dict(System *sys)
sys->dict = new Builtin((const char *)"*", 1, sys->dict, mul);
sys->dict = new Builtin((const char *)"!", 1, sys->dict, store);
sys->dict = new Address((const char *)"ARENA", 5, sys->dict, reinterpret_cast<KF_ADDR>(&sys->arena));
sys->dict = new Address((const char *)"DICT", 5, sys->dict, reinterpret_cast<KF_ADDR>(&sys->dict));
sys->dict = new Address((const char *)"DICT", 4, sys->dict, reinterpret_cast<KF_ADDR>(&sys->dict));
}
bool