blob: 92afc7d27d3afe3e03b6593de531e771bc90b155 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
|
#include "learning-parts.hpp"
using namespace habitstarts;
using namespace intellect::level1;
static int __init = ([]()->int{
ahabit(happened-habit,
{
ref ev = ctx.get(happens);
// TODO: perform each event associated with ctx[happens] (see line above)
// use a sub-habit for each call, so we can handle happened for them, too.
});
ahabit(whenever-habit,
{
// store ctx[action] on ctx[happens] as behavior to do
// store ctx[action-context] as context for behavior
// PROPOSE: automatically place [happened] inside [action-context] as a stub
// for call event objects, and then place [context] inside [happened].
// PROPOSE: report error if [action-context] contains [happened]
// as a stub for error patterns, it would be pretty nice to throw
// a unique concept ref for each error type. plan to add to level-0.
});
ahabit(stop-when-habit,
{
// remove doing ctx[action] for ctx[happens]
});
ahabit(once-habit,
{
// takes ctx[action] and ctx[happens] and ctx[action-context]
// uses above habits to do the action only once, probably by using
// a trigger on the habit-happening habit to check if a label is set,
// and remove the habit if it is.
});
return 0;
})();
|
