diff --git a/swank-allegro.lisp b/swank-allegro.lisp index 1ef352d..7f58a33 100644 --- a/swank-allegro.lisp +++ b/swank-allegro.lisp @@ -597,7 +597,7 @@ (ecase type ((:unsigned-word :unsigned-byte :unsigned-natural :unsigned-long :unsigned-half-long - :unsigned-3byte) + :unsigned-3byte :func) (label-value-line name (inspect::component-ref-v object access type))) ((:lisp :value) (label-value-line name (inspect::component-ref object access)))