/[slime]/slime/swank-allegro.lisp
ViewVC logotype

Diff of /slime/swank-allegro.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.144 by sboukarev, Wed Aug 17 15:40:47 2011 UTC revision 1.145 by heller, Wed Oct 19 09:47:57 2011 UTC
# Line 720  Line 720 
720    (with-struct (inspect::field-def- name type access) def    (with-struct (inspect::field-def- name type access) def
721      (ecase type      (ecase type
722        ((:unsigned-word :unsigned-byte :unsigned-natural        ((:unsigned-word :unsigned-byte :unsigned-natural
723                         :unsigned-long :unsigned-half-long                         :unsigned-long :unsigned-half-long
724                         :unsigned-3byte)                         :unsigned-3byte :unsigned-long32)
725         (label-value-line name (inspect::component-ref-v object access type)))         (label-value-line name (inspect::component-ref-v object access type)))
726        ((:lisp :value :func)        ((:lisp :value :func)
727         (label-value-line name (inspect::component-ref object access)))         (label-value-line name (inspect::component-ref object access)))

Legend:
Removed from v.1.144  
changed lines
  Added in v.1.145

  ViewVC Help
Powered by ViewVC 1.1.5