diff options
Diffstat (limited to 'stdlib/struct.tl')
| -rw-r--r-- | stdlib/struct.tl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/stdlib/struct.tl b/stdlib/struct.tl index 4d544b4d..892b5c05 100644 --- a/stdlib/struct.tl +++ b/stdlib/struct.tl @@ -228,7 +228,8 @@ ^(sys:make-struct-lit ',name ',plist)) (defun sys:check-slot (form slot) - (unless (or (sys:slot-types slot) + (unless (or (not (bindable slot)) + (sys:slot-types slot) (sys:static-slot-types slot)) (compile-defr-warning form ^(slot . ,slot) "~s isn't the name of a struct slot" |