5902343352
Nach dem gruenen VF_SPEC_BAU-Lauf bauten zwei Tests dieselben 5 Ketten. Der Spec-Pfad ist jetzt der routinemaessige Bau-Test, der Aufzeichnungs-Pfad der abgeschaltete Regressionstest fuer das Journal-Format. Umbenennungen: - tests/testdata/vf_spec_hundm05.json -> tests/testdata/hundm05.json Die Spec ist das Eingabeformat und die Datei, in der weitere Ketten der Anlage nachgetragen werden. spec_ids jetzt VF_hundm05_LZ_* (wie im Aufzeichnungs-Protokoll), damit sich die Ergebnisse beider Laeufe paaren lassen. - tests/testdata/hundm05.json -> tests/testdata/hm_recformat.json tests/test_hundm05.lsp -> tests/test_hm_recformat.lsp (TEST_HM_RECFORMAT, Praefix hmrec:, Export hm_recformat:export-results) tests/test_hundm05.py -> tests/test_hm_recformat.py In alltests.json auf "disabled": true. Neu: tests/test_hundm05.lsp (TEST_HUNDM05) baut die Spec - OHNE eigene Bau-Logik, es ruft vsp-bau-datei aus Lisp/vf_spec.lsp. Damit gibt es genau einen Code-Pfad, der aus einer Spec Geometrie erzeugt; c:VF_SPEC_BAU nutzt denselben. tests/test_hundm05.py prueft das Ergebnis (die 9 Tests, die vorher in test_vf_spec.py standen); test_vf_spec.py ist jetzt reiner Uebersetzer-Test ohne CAD. Warum das Aufzeichnungsformat bleibt (Details in doc/TODO-plan-vf-interactive.md Abschnitt 4.7): - hm_recformat.json ist die EINZIGE eingecheckte Kopie der Originaldaten (data/polylines.dxf ist mit 124 MB per .gitignore ausgeschlossen). Die Spec ist daraus abgeleitet; ohne die Aufzeichnung faellt die rechte Seite des Rundlauf-Beweises weg. - Es prueft eine ANDERE Invariante: das Journal kommt roh aus der XDATA einer Kundenzeichnung. TEST_HM_RECFORMAT ist damit der einzige Test dafuer, dass ein BESTEHENDER VF_n-Block weiter abspielbar ist - also dass Doppelklick-Edit und 2D/3D-Konvertierung an Altbestand funktionieren. Ein spec-gebautes Journal kann das nicht zeigen, es kommt aus dem Uebersetzer. - Es dokumentiert die Frage-Reihenfolge (kommentar je Eintrag); die Spec verbirgt den Dialog, das ist ihr Zweck. Weitere Anpassungen: - Ergebnisdatei heisst nach der Spec-Datei (<basisname>_results.json), damit Befehl und Testrunner in dieselbe Datei schreiben. Verzeichnis: tests/output (Override DXFM_VF_SPEC_OUT); NICHT DXFM_RESULTS - das sind die Sivas-/ CSV-Exporte, dort landete die Datei ausserhalb des Testbaums. - Neu *vsp-dim-override* fuer TEST_HUNDM05_2D/_3D: wird je Kette angewandt, weil der Abbruch-Handler in vf-linienzug-modus *ssg-ils-dim* zurueck setzt. - Das Anlagenkuerzel der test_id in lib/vf_journal_export.py kam aus dem Namen der Ziel-JSON. Nach der Umbenennung haette eine Regenerierung die ids stillschweigend auf VF_hm_recformat_LZ_* geaendert und die Paarung der beiden Laeufe zerlegt - jetzt feste Konstante TEST_ID_ANLAGE. - conftest: hundm05_* Fixtures -> hmrec_* (die Spec-Fixtures stehen in tests/test_hundm05.py). Verifiziert: 98 pytest-Tests gruen (die 9 Ergebnis-Tests warten auf einen neuen TEST_HUNDM05-Lauf), alle .lsp lint-sauber, Spec-Regenerierung idempotent, TEST_VF_SPEC in BricsCAD 28 PASS / 0 FAIL. Co-Authored-By: Claude Opus 5 (1M context) <noreply@anthropic.com>
111 lines
4.7 KiB
Common Lisp
111 lines
4.7 KiB
Common Lisp
;; ============================================================
|
|
;; test_hundm05.lsp - Integrationstest: baut die 5 VarioFoerderer-Linienzuege
|
|
;; der Anlage HundM (Kreisel mit fuenf daran haengenden Ketten) aus ihrer
|
|
;; SPEC nach.
|
|
;;
|
|
;; Datenquelle: tests/testdata/hundm05.json - die Ketten im Spec-Format
|
|
;; (Domaenenwerte statt Menue-Codes, siehe Lisp/vf_spec.lsp und
|
|
;; doc/variofoerderer.md Abschnitt 8b). Erzeugt aus den echten
|
|
;; Aufzeichnungen mit
|
|
;; python lib/vf_spec_export.py tests/testdata/hm_recformat.json \
|
|
;; tests/testdata/hundm05.json
|
|
;; und damit nachweislich dasselbe Journal wie die Vorlage
|
|
;; (Rundlauf-Beweis in tests/test_vf_spec.py). Die Datei ist die Stelle, an
|
|
;; der weitere Ketten der Anlage nachgetragen werden.
|
|
;;
|
|
;; Dieser Test hat KEINE eigene Bau-Logik: er ruft vsp-bau-datei aus
|
|
;; Lisp/vf_spec.lsp - denselben Weg, den auch der Befehl VF_SPEC_BAU nimmt.
|
|
;; Es gibt also genau einen Code-Pfad, der aus einer Spec Geometrie erzeugt.
|
|
;;
|
|
;; ABGRENZUNG zu TEST_HM_RECFORMAT (tests/test_hm_recformat.lsp): dort werden
|
|
;; dieselben Ketten aus dem ROHEN Journal der Kundenzeichnung gebaut. Das ist
|
|
;; der Regressionstest fuer das Aufzeichnungsformat (bleibt ein bestehender
|
|
;; VF_n-Block abspielbar - Doppelklick-Edit, 2D/3D-Konvertierung?) und
|
|
;; deshalb dort auf "disabled": true, um nicht zweimal dieselbe Geometrie zu
|
|
;; bauen.
|
|
;;
|
|
;; Voraussetzung:
|
|
;; - SSG_LIB geladen (VarioFoerderer inkl. vf_linienzug + vf_spec,
|
|
;; Gefaellestrecke, ssg_core, ssg_dbg)
|
|
;; - Umgebungsvariable DXFMAKRO gesetzt
|
|
;;
|
|
;; Speichert (via SSG_RUN_ALL_TESTS bei "save":"dxf"):
|
|
;; tests/output/hundm05_tests.dxf
|
|
;; tests/output/hundm05_results.json (via hundm05:export-results)
|
|
;;
|
|
;; Aufruf in BricsCAD:
|
|
;; (load (strcat (getenv "DXFMAKRO") "/tests/test_hundm05.lsp"))
|
|
;; TEST_HUNDM05 ; in der aktuellen Dimension (ssg-ils-dim-aktuell)
|
|
;; TEST_HUNDM05_2D ; erzwungen 2D
|
|
;; TEST_HUNDM05_3D ; erzwungen 3D
|
|
;; ============================================================
|
|
|
|
(if (not (boundp '*hundm05-records*)) (setq *hundm05-records* nil))
|
|
|
|
(defun hundm05:spec-datei ()
|
|
(strcat (getenv "DXFMAKRO") "/tests/testdata/hundm05.json"))
|
|
|
|
|
|
;; ============================================================
|
|
;; Testlauf
|
|
;; ============================================================
|
|
|
|
(defun c:TEST_HUNDM05 ( / datei)
|
|
(setq datei (hundm05:spec-datei))
|
|
(princ "\n\n================================================================")
|
|
(princ "\n TEST_HUNDM05 - 5 Linienzuege der Anlage HundM (aus der Spec)")
|
|
(princ (strcat "\n " datei))
|
|
(princ "\n================================================================")
|
|
(cond
|
|
((null (car (atoms-family 1 '("VSP-BAU-DATEI"))))
|
|
(princ "\n[TEST_HUNDM05] FEHLER: vf_spec.lsp nicht geladen"
|
|
" (VarioFoerderer laden).")
|
|
(setq *hundm05-records* nil))
|
|
((null (findfile datei))
|
|
(princ (strcat "\n[TEST_HUNDM05] FEHLER: " datei " nicht gefunden!"))
|
|
(setq *hundm05-records* nil))
|
|
(T
|
|
(setq *hundm05-records* (vsp-bau-datei datei))))
|
|
(princ))
|
|
|
|
|
|
;; ============================================================
|
|
;; Dieselbe Anlage in einer bestimmten Dimension bauen
|
|
;; ============================================================
|
|
;; Die Spec ist dimensionsfrei - sie beschreibt die Eingaben, mit denen die
|
|
;; Ketten gebaut wurden. Ob daraus flache 2D-Symbole oder 3D-Modelle werden,
|
|
;; entscheidet allein die Blockvariante (_2D/_3D), die ssg-ils-dim-aktuell
|
|
;; aufloest. Unsere Bibliothek hat beide, also laesst sich dieselbe Anlage
|
|
;; ohne Datenaenderung in 2D ODER 3D aufbauen.
|
|
;; *vsp-dim-override* wird von vsp-bau-aus-spec JE KETTE angewandt (der
|
|
;; Abbruch-Handler in vf-linienzug-modus setzt *ssg-ils-dim* zurueck).
|
|
|
|
(defun hundm05:mit-dimension (dim / alt)
|
|
(setq alt (if (boundp '*vsp-dim-override*) *vsp-dim-override*))
|
|
(setq *vsp-dim-override* dim)
|
|
(vl-catch-all-apply 'c:TEST_HUNDM05 '())
|
|
(setq *vsp-dim-override* alt)
|
|
(princ))
|
|
|
|
(defun c:TEST_HUNDM05_2D () (hundm05:mit-dimension "2D"))
|
|
(defun c:TEST_HUNDM05_3D () (hundm05:mit-dimension "3D"))
|
|
|
|
|
|
;; ============================================================
|
|
;; Ergebnis-Export (Konvention <name>:export-results fuer test_run_all.lsp)
|
|
;; ============================================================
|
|
;; Geschrieben wird hier und nicht in c:TEST_HUNDM05, damit der Testrunner
|
|
;; das Zielverzeichnis bestimmt (er uebergibt tests/output).
|
|
|
|
(defun hundm05:export-results (out-dir / pfad)
|
|
(if (null *hundm05-records*)
|
|
(princ "\n Keine HundM05-Ergebnisse vorhanden.")
|
|
(progn
|
|
(vl-mkdir out-dir)
|
|
(setq pfad (strcat out-dir "/hundm05_results.json"))
|
|
(vsp-results-schreiben *hundm05-records* pfad)))
|
|
(princ))
|
|
|
|
(princ "\nTEST_HUNDM05 geladen. Aufruf: TEST_HUNDM05 (bzw. _2D / _3D)")
|
|
(princ)
|