X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Fmop-12.impure-cload.lisp;h=f39915bf1eb1807216271ef1aeb020e252419827;hb=8fb553e9d867f6345932beaa78fcd07d8d4e555b;hp=5bcbbb0f1c1c1e6e5007a9b51fda4c90dd110084;hpb=47bf3e24a52a2687bd8f07c4674cb9e81163085d;p=sbcl.git diff --git a/tests/mop-12.impure-cload.lisp b/tests/mop-12.impure-cload.lisp index 5bcbbb0..f39915b 100644 --- a/tests/mop-12.impure-cload.lisp +++ b/tests/mop-12.impure-cload.lisp @@ -34,7 +34,7 @@ (defvar *count1* 0) -(defmethod myfun1 (a b) +(defmethod myfun1 (a b) (incf *count1*)) (myfun1 2 3) @@ -63,7 +63,7 @@ (defvar *count2* 0) -(defmethod myfun2 (a b) +(defmethod myfun2 (a b) (incf *count2*)) (myfun2 2 3)