From 9b2bfed255672c02a03140df510a6c05a572e420 Mon Sep 17 00:00:00 2001 From: Michael Stangl Date: Tue, 30 Jun 2026 11:05:16 +0200 Subject: [PATCH] Debug Erzeugung aus dem Foerderer lisp Test entfernt --- tests/test_foerderer.lsp | 13 ------------- 1 file changed, 13 deletions(-) diff --git a/tests/test_foerderer.lsp b/tests/test_foerderer.lsp index 32b13e4..a8da863 100644 --- a/tests/test_foerderer.lsp +++ b/tests/test_foerderer.lsp @@ -86,25 +86,13 @@ (setvar "ATTREQ" 0) (setvar "ATTDIA" 0) - ;; Debug-Logging starten - (dbgopen "test_foerderer.dbg" "DXFM_LOG") - ;; Testdaten aus JSON laden (setq json-datei (strcat (getenv "DXFMAKRO") "\\tests\\testdata\\foerderer_tests.json")) - - (dbgmsg (strcat "DXFMAKRO=" (if (getenv "DXFMAKRO") (getenv "DXFMAKRO") "nil"))) - (dbgmsg (strcat "json-datei=" json-datei)) - (dbgmsg (strcat "file-exists=" (if (findfile json-datei) "JA" "NEIN"))) - (dbgflush) - (setq testdaten (ssg-load-json json-datei)) (if (null testdaten) (progn - (dbgmsg "FEHLER: testdaten ist nil nach ssg-load-json") - (dbgflush) - (dbgclose) (alert (strcat "Testdaten nicht gefunden:\n" json-datei)) (ssg-end) (exit) @@ -212,7 +200,6 @@ ;; Ergebnisse in globaler Variable speichern (setq *foerderer-test-results* (reverse results-list)) - (dbgclose) (ssg-end) (princ "\n================================================================") (princ "\n TEST_FOERDERER abgeschlossen.")