X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/dbac800b3d4476312e1fc73e87931f31cdfdd9a0..52a79ab8b310a785f2c2f1a11069f3a5ad53810c:/src/builtin.lisp diff --git a/src/builtin.lisp b/src/builtin.lisp index c38d92c..8b4407b 100644 --- a/src/builtin.lisp +++ b/src/builtin.lisp @@ -61,7 +61,7 @@ ',name (lambda (,classvar) (make-sod-slot ,classvar ,name (c-type ,type) - (make-property-set :lisp-class 'sod-class-slot + (make-property-set :slot-class 'sod-class-slot :initializer-function (lambda (,class) ,init)