X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=src%2Fviews.scm;h=8e2c21cf47c6f7b6a366ad272bb37bf39f8aa49e;hb=efd2c5b0434a5ca6aafa8a44e31618aa21953676;hp=887c65cb9cbdeeecbee760f5e895493fa0b6629e;hpb=f02971f747ab2e643e2bc6bd962a068329b0f402;p=gacela.git diff --git a/src/views.scm b/src/views.scm index 887c65c..8e2c21c 100644 --- a/src/views.scm +++ b/src/views.scm @@ -116,7 +116,6 @@ (format port " ~a" x)))) (mesh-properties record)) (display ">" port)))) - (define mesh? (record-predicate mesh-type))