diff options
| author | olpc user <olpc@xo-5d-f7-86.localdomain> | 2019-12-30 09:38:53 -0800 |
|---|---|---|
| committer | olpc user <olpc@xo-5d-f7-86.localdomain> | 2019-12-30 09:38:53 -0800 |
| commit | 3fdf216140d3b23d016d55b69cf439fed4c174a0 (patch) | |
| tree | 356045f8e6caeaea399386bc98c951ee78a152ce /starts/meaning-vm/level-2/funcs.cpp | |
| parent | 4df8ccec5e9e1d2c1480d164971d92ec78fdee7d (diff) | |
| download | standingwithresilience-3fdf216140d3b23d016d55b69cf439fed4c174a0.tar.gz standingwithresilience-3fdf216140d3b23d016d55b69cf439fed4c174a0.zip | |
one mess later, i think i found enough parts such that this will run after bugfixes
Diffstat (limited to 'starts/meaning-vm/level-2/funcs.cpp')
| -rw-r--r-- | starts/meaning-vm/level-2/funcs.cpp | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/starts/meaning-vm/level-2/funcs.cpp b/starts/meaning-vm/level-2/funcs.cpp index b11413f..0cef918 100644 --- a/starts/meaning-vm/level-2/funcs.cpp +++ b/starts/meaning-vm/level-2/funcs.cpp @@ -16,6 +16,8 @@ ref & context() return ctx; } +//ref makehabit(ref name, std::list<ref> argnames, std::any + ref makehabit(ref name, std::initializer_list<ref> argnames, std::function<void(ref)> code) { ref habit = level1::a(concepts::habit, name); @@ -71,6 +73,7 @@ ref dohabit(ref habit, std::initializer_list<ref> args) } ref::context().set(posinf[information], posinf[assume]); } + ref::context().set("self", habit); habit.fun<ref>()(ref::context()); posinf = habit.get(information-needed); while (posinf.linked(next-information)) { |