diff --git a/tests/test_gefaellestrecke.lsp b/tests/test_gefaellestrecke.lsp index a061e7a..90b01fc 100644 --- a/tests/test_gefaellestrecke.lsp +++ b/tests/test_gefaellestrecke.lsp @@ -285,7 +285,15 @@ bR90 bR60 bR30 startpunkt last-ent nach-aus-pt entry-hz (caddr (nth first-idx segmente)) - es-seite "0" "Schoenenberger Geruest")) + ;; as-winkel/es-winkel: diese Funktion baut durchgaengig mit + ;; AS_Element_90_*/ES_Element_90_* (siehe oben, as-block/es-block) - + ;; "90" ist hier also keine Annahme, sondern deckungsgleich mit dem + ;; Rest der Funktion. gf-block-erstellen bekam die beiden Parameter + ;; erst nachtraeglich (WINKEL_AS/WINKEL_ES, ddb5dfa) - dieser + ;; Testtreiber-Aufruf war seitdem einer von vier Aufrufstellen und + ;; wurde dabei nicht mit aktualisiert (Arity-Fehler: "too few / + ;; too many arguments at [GF-BLOCK-ERSTELLEN]"). + es-seite "0" "Schoenenberger Geruest" "90" "90")) gf-ins ) )