Re: [Help-smalltalk] [bug] Infinite re-cursion on VisualGST inspector

[Holger Hans Peter Freyther]

Issue status update for 
http://smalltalk.gnu.org/project/issue/722
Post a follow up: 
http://smalltalk.gnu.org/project/comments/add/722

Project:      GNU Smalltalk
Version:      <none>
Component:    VisualGST
Category:     bug reports
Priority:     normal
Assigned to:  Unassigned
Reported by:  zecke
Updated by:   zecke
Status:       active


printOn: aStream
  "Print a representation of the receiver on aStream"
  aStream nextPutAll: self class storeString , '[', proxy name, '] (' ;
nl.
  self myKeysAndValuesDo:
      [ :key :value | aStream tab;
                 print: key;
                 nextPutAll: '->';
                 print: value;
                 nl ].   
  aStream nextPut: $)
!



is the fixed but still broken code. I addded a self == value ifFalse:
[].. but this results in having nothing printed at all. I am not sure if
that is the correct output.