X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Flambda-list.lisp;h=ed0669f470c7a0b040cf75ec8d0a48c7aab88bba;hb=68cd2db6542fa3442d46b0331ecf8be8f86c09c2;hp=1fdb24e5b5cdad8ef2ec87457c1a1772bcb0248e;hpb=fda11e06398fca9ad42ea737ec169a97aaf8fd8e;p=jscl.git

diff --git a/src/lambda-list.lisp b/src/lambda-list.lisp
index 1fdb24e..ed0669f 100644
--- a/src/lambda-list.lisp
+++ b/src/lambda-list.lisp
@@ -18,16 +18,16 @@
 
 ;;;; Lambda list parsing
 
-(defstruct optvar
+(def!struct optvar
   variable initform supplied-p-parameter)
 
-(defstruct keyvar
+(def!struct keyvar
   variable keyword-name initform supplied-p-parameter)
 
-(defstruct auxvar
+(def!struct auxvar
   variable initform)
 
-(defstruct d-lambda-list
+(def!struct d-lambda-list
   wholevar
   reqvars
   optvars