From c1d92d11dc4cd230b996a60607a6e404d8d63424 Mon Sep 17 00:00:00 2001 From: AJ Rossini Date: Mon, 3 Dec 2007 19:44:24 +0100 Subject: [PATCH] better test example for defproto2, but defproto2 still fails. --- ls-demo.lisp | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/ls-demo.lisp b/ls-demo.lisp index f421553..fba6605 100644 --- a/ls-demo.lisp +++ b/ls-demo.lisp @@ -206,7 +206,8 @@ my-chol-decomp-test (send *test-proto* :has-slot 'PROTO-NAME) -(defproto2 *test-proto3*) +(defproto2 *test-proto3* (list) (list) (list) "test doc" t) +(defproto2 *test-proto4*) *test-proto2* (defmeth *test-proto* :make-data (&rest args) nil) -- 2.11.4.GIT