X-Git-Url: https://git.jsancho.org/?p=gacela.git;a=blobdiff_plain;f=src%2Fviews.scm;h=8e2c21cf47c6f7b6a366ad272bb37bf39f8aa49e;hp=887c65cb9cbdeeecbee760f5e895493fa0b6629e;hb=bdc03bcc2da4d01745fb542d7a7d642b888b691e;hpb=f02971f747ab2e643e2bc6bd962a068329b0f402 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))