Miroirs/sallyforth
1
0
Fork 0
mirror of https://github.com/russolsen/sallyforth synced 2024-12-25 21:58:18 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

Set *source* during init.

Browse source
This commit is contained in:
Russ Olsen 2020-04-23 09:09:07 -04:00
parent f1bdf52b2b
commit 965f78f142
1 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
sallyforth/kernel.py
View file

@ -23,6 +23,7 @@ class Forth:
initial_defs = { initial_defs = {
'*prompt*': const_f('SallyForth>> '), '*prompt*': const_f('SallyForth>> '),
'macroexpand': w_enlist, 'macroexpand': w_enlist,
'*source*': const_f(__file__),
'true': const_f(True), 'true': const_f(True),
'false': const_f(False), 'false': const_f(False),
'nil': const_f(None), 'nil': const_f(None),
@ -149,6 +150,7 @@ class Forth:
return return
if token in self.namespace: if token in self.namespace:
# print("executing ", token)
self.namespace[token](self, 0) self.namespace[token](self, 0)
return return