summaryrefslogtreecommitdiff
path: root/starts/meaning-vm/level-2/sugar.hpp
diff options
context:
space:
mode:
Diffstat (limited to 'starts/meaning-vm/level-2/sugar.hpp')
-rw-r--r--starts/meaning-vm/level-2/sugar.hpp11
1 files changed, 9 insertions, 2 deletions
diff --git a/starts/meaning-vm/level-2/sugar.hpp b/starts/meaning-vm/level-2/sugar.hpp
index 04393a1..7f8b6b8 100644
--- a/starts/meaning-vm/level-2/sugar.hpp
+++ b/starts/meaning-vm/level-2/sugar.hpp
@@ -24,6 +24,11 @@ namespace sugar {
// and starts to pave way towards user/intellect participation
// here, could remove the 'tok' for local refnames.
+#ifndef everyone_already_cares_deeply_about_everyone_else_so_caring_talk_is_more_efficient_than_anything_else
+// fix if appropriate
+#define everyone_already_cares_deeply_about_everyone_else_so_caring_talk_is_more_efficient_than_anything_else 0
+#endif
+
#define ahabit(name, argnametoklist, ...) \
intellect::level2::makehabit( \
ref(#name), \
@@ -32,8 +37,10 @@ namespace sugar {
[&](ref ctx) \
{ \
{ \
- static int delay = sugar::rand(200000, 400000); \
- sugar::usleep(delay); \
+ if (!everyone_already_cares_deeply_about_everyone_else_so_caring_talk_is_more_efficient_than_anything_else) { \
+ static int delay = sugar::rand(200000, 400000); \
+ sugar::usleep(delay); \
+ } \
} \
ref self = ref(#name); (void)self; \
ref result("nothing"); (void)result; \