coop/rose-ash
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

mod: Ext 15 — disjunctive (:any) conditions, 333/333
Some checks failed
Test, Build, and Deploy / test-build-deploy (push) Failing after 29s
Details

Browse Source 
(:any (list c1 c2 ...)) compiles to Prolog disjunction (g1 ; g2 ; ...), completing
the condition boolean algebra (AND via :when list, :not, :any). cond->goal
recurses so combinators nest arbitrarily; the proof tree shows the compiled
disjunction verbatim. Maps onto Prolog's control constructs rather than
reimplementing boolean logic in SX. +10 tests.

Co-Authored-By: Claude Opus 4.8 (1M context) <noreply@anthropic.com>
This commit is contained in:
giles
2026-06-06 19:23:15 +00:00
parent b43901d297
commit 329b3c4903
6 changed files with 185 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
lib/mod/scoreboard.json
View File

@@ -1,8 +1,8 @@
{
"lang": "mod",
"total_passed": 323,
"total_passed": 333,
"total_failed": 0,
"total": 323,
"total": 333,
"suites": [
{"name":"decide","passed":31,"failed":0,"total":31},
{"name":"audit","passed":29,"failed":0,"total":29},
@@ -19,7 +19,8 @@
{"name":"batch","passed":17,"failed":0,"total":17},
{"name":"temporal","passed":15,"failed":0,"total":15},
{"name":"sla","passed":15,"failed":0,"total":15},
{"name":"wire","passed":16,"failed":0,"total":16}
{"name":"wire","passed":16,"failed":0,"total":16},
{"name":"disjunction","passed":10,"failed":0,"total":10}
],
"generated": "2026-06-06T19:16:49+00:00"
"generated": "2026-06-06T19:22:42+00:00"
}