ska: add spot hints to code table

This commit is contained in:
Joe Bryan 2024-06-11 21:50:52 -04:00
parent 428e1c63a5
commit de9a61b190
2 changed files with 8 additions and 2 deletions

View File

@ -431,7 +431,7 @@
=. hint.gen (~(del by hint.gen) site)
=/ loan (~(get ja moan.gen) form)
=? moan.gen (levy loan |=([ss=sock *] !=(soot ss)))
(~(add ja moan.gen) form [soot u.load ices lope fizz])
(~(add ja moan.gen) form [soot u.load ices lope fizz seat.dad area.gen])
gen
::
:: +scan: statefully analyze formula against subject

View File

@ -76,5 +76,11 @@
:: ices: labels for direct calls
:: loop: set of direct calls which are recursive
+$ food
[=nomm ices=(map @hail [=sock form=*]) loop=(set [=sock form=*]) fizz=(map @hint *)]
$: =nomm
ices=(map @hail [=sock form=*])
loop=(set [=sock form=*])
fizz=(map @hint *)
seat=(unit spot)
area=(unit spot)
==
--