diff options
Diffstat (limited to 'sucl/loop.icl')
| -rw-r--r-- | sucl/loop.icl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/sucl/loop.icl b/sucl/loop.icl index 7c13d57..1090a88 100644 --- a/sucl/loop.icl +++ b/sucl/loop.icl @@ -267,7 +267,7 @@ initrule initrule [root:heap] template sym = (heap`,mkrule args root (updategraph root (sym,args) emptygraph)) - where (args,heap`) = claim (template sym) heap + where (args,heap`) = (claim--->"basic.claim begins from loop.initrule") (template sym) heap initrule _ _ _ = abort "initrule: out of heap space" |