mirror of
https://github.com/SHOGGOTH-SECTOR/sica-fondt.git
synced 2026-09-30 01:15:10 +00:00
ichor(D2): fix package docstrings so it compiles; verify green
Pony allows one package docstring per package — collapse the four secondary files' leading docstrings to // comments. ichor now compiles on ponyc 0.64.0 and the smoke wiring runs green (internal perfused, external rejected at D1, cross-organ delivered). Update README + D2 status to reflect it builds; ignore build/. Co-Authored-By: Claude Opus 4.8 (1M context) <noreply@anthropic.com> Claude-Session: https://claude.ai/code/session_015hmgREHNsxYCuim33yUF2c
This commit is contained in:
+10
-12
@@ -1,15 +1,13 @@
|
||||
"""
|
||||
The blood-brain barrier (D1). `Barrier.admit` is the screening decision every
|
||||
Brain-bound envelope must pass — perfusion law L2: everything reaching the Brain
|
||||
crosses Ada (D1) first.
|
||||
|
||||
Real wiring crosses into Ada's `Trust_Guard` (provenance + blocklist + rate) via
|
||||
the C/Fortran seam (`ichor_ada_shim.c`). Until that binding is built, this mirrors
|
||||
the provenance law in pure Pony so the broker is testable standalone.
|
||||
|
||||
To switch to the Ada border, add `use "lib:ichor_ada"` and replace the body of
|
||||
`admit` with the FFI call sketched below.
|
||||
"""
|
||||
// The blood-brain barrier (D1). `Barrier.admit` is the screening decision every
|
||||
// Brain-bound envelope must pass — perfusion law L2: everything reaching the
|
||||
// Brain crosses Ada (D1) first.
|
||||
//
|
||||
// Real wiring crosses into Ada's `Trust_Guard` (provenance + blocklist + rate)
|
||||
// via the C/Fortran seam (`ichor_ada_shim.c`). Until that binding is built, this
|
||||
// mirrors the provenance law in pure Pony so the broker is testable standalone.
|
||||
//
|
||||
// To switch to the Ada border, add `use "lib:ichor_ada"` and replace the body of
|
||||
// `admit` with the FFI call sketched below.
|
||||
|
||||
primitive Barrier
|
||||
fun admit(envl: Envelope): Bool =>
|
||||
|
||||
Reference in New Issue
Block a user