From ff709e014d8f61aa83f3633f27f0913f4632d272 Mon Sep 17 00:00:00 2001 From: "Pierre R. Mai" Date: Mon, 9 Oct 2000 22:10:01 +0000 Subject: [PATCH] Added ignore declaration to quiet the compiler. --- src/main/entity.cl | 1 + 1 file changed, 1 insertion(+) diff --git a/src/main/entity.cl b/src/main/entity.cl index c62201f..3b6045f 100644 --- a/src/main/entity.cl +++ b/src/main/entity.cl @@ -68,6 +68,7 @@ (defgeneric stream-entity-length (entity)) (defmethod render-entity-headers :before ((e stream-entity-mixin) stream) + (declare (ignore stream)) (setf (slot-value e 'content-length) (stream-entity-length e))) (defmethod render-entity-body ((entity stream-entity-mixin) stream)