Files
passepartout/org/tmp/test-fix.lisp
Amr Gharbeia ee81fa2755
Some checks failed
Deploy (Gitea) / deploy (push) Has been cancelled
fix: system-self-improve — complete self-edit with tangle+reload, fix self-repair
Reworked the system-self-improve skill end-to-end:

1. self-improve-edit:
   - Inline text replacement (no longer depends on org-modify which was
     in an unexported skill package and broken)
   - After editing a .org file, automatically tangles to .lisp, compiles,
     and loads the result into the running daemon
   - Memory snapshot before edit for rollback safety

2. self-improve-balance-parens:
   - New utility: detects unbalanced parens via the Lisp reader, counts
     open/close parens using loop+char= (avoiding #\( #\) which
     confuse text-based paren counting)
   - Returns balanced code or nil if already balanced

3. self-improve-repair-syntax:
   - New driver: locates a skill's .org source file, extracts all lisp
     blocks, runs each through balance-parens, writes fixes back,
     then tangles+compiles+loads

4. self-improve-fix:
   - Diagnosis phase (unchanged): pattern-matches error logs for Reader
     Error, Undefined symbol, or PACKAGE errors
   - Repair phase (new): dispatches syntax errors to
     self-improve-repair-syntax; other error types return diagnosis
     with :repaired nil

5. Infrastructure:
   - org-tangle-file: reads #+PROPERTY: header-args:lisp :tangle from
     any .org file, extracts blocks, writes .lisp, compiles, loads
   - org-extract-lisp-blocks: extracts all #+begin_src lisp blocks
     from an Org content string
2026-05-03 14:49:13 -04:00

3 lines
30 B
Common Lisp