Use def!struct

[jscl.git] / src / lambda-list.lisp

diff --git a/src/lambda-list.lisp b/src/lambda-list.lisp
index 1fdb24e..ed0669f 100644 (file)
--- 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