Commit 759d0580 authored by pfdietz's avatar pfdietz
Browse files

Allegro 'modern' mode compatibility fix.

parent 3c829721
......@@ -128,7 +128,7 @@
(map-slot-value newobj '(a b c)))))
2 t (t t t) (7 100 64))
(defpackage "CL-TEST-MLFSS-PACKAGE" (:use) (:export "A"))
(defpackage "CL-TEST-MLFSS-PACKAGE" (:use) (:export #:a))
(defstruct mlfss-03 cl-test-mlfss-package:a)
(deftest make-load-form-savings-slots.10
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment