diff options
| -rw-r--r-- | stdlib/place.tl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/stdlib/place.tl b/stdlib/place.tl index b7437de2..bcf54ccc 100644 --- a/stdlib/place.tl +++ b/stdlib/place.tl @@ -800,6 +800,8 @@ ,body))) (defun sys:get-fun-getter-setter (sym : f) + (unless (bindable sym) + (compile-error f "~s isn't a bindable symbol" sym)) (tree-case sym ((type struct slot) (if (eq type 'meth) |