X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=src%2Fviews.scm;h=8e2c21cf47c6f7b6a366ad272bb37bf39f8aa49e;hb=1c898284a9d3ea84cda71e4ff3c6f39c0bba644b;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))