From: David Vázquez Date: Sun, 5 May 2013 15:21:26 +0000 (+0100) Subject: Use def!struct X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=68cd2db6542fa3442d46b0331ecf8be8f86c09c2;p=jscl.git Use def!struct --- 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