From 3cf5c8351289d390112a3842b6c03e17cee20211 Mon Sep 17 00:00:00 2001
From: Alexey Dejneka <adejneka@comail.ru>
Date: Tue, 17 Jun 2003 07:26:49 +0000
Subject: [PATCH] (put the lost line)

---
 tests/compiler.pure.lisp |    1 +
 1 file changed, 1 insertion(+)

diff --git a/tests/compiler.pure.lisp b/tests/compiler.pure.lisp
index 043de60..30cc9dc 100644
--- a/tests/compiler.pure.lisp
+++ b/tests/compiler.pure.lisp
@@ -456,3 +456,4 @@
   (let ((y (make-array 2 :element-type 'bit :initial-element 0)))
     (assert (equal y #*00))
     (funcall f y 1)
+    (assert (equal y #*10))))
-- 
1.7.10.4