Behavior.st
branchjv
changeset 19899 25b35b705da5
parent 19862 6c010853ea32
parent 19895 107644108896
child 19912 ca84ec5f80a7
equal deleted inserted replaced
19892:d1aecb538df5 19899:25b35b705da5
  1420 shortName
  1420 shortName
  1421     ^ self nameWithoutPrefix
  1421     ^ self nameWithoutPrefix
  1422 ! !
  1422 ! !
  1423 
  1423 
  1424 
  1424 
       
  1425 
  1425 !Behavior methodsFor:'RefactoringBrowser'!
  1426 !Behavior methodsFor:'RefactoringBrowser'!
  1426 
  1427 
  1427 realClass
  1428 realClass
  1428     "for compatibility with RBAbstractClass"
  1429     "for compatibility with RBAbstractClass"
  1429 
  1430 
  3027      and return it.
  3028      and return it.
  3028      The read object must be a kind of myself if its not, an error is raised.
  3029      The read object must be a kind of myself if its not, an error is raised.
  3029      This is the reverse operation to 'storeOn:'.
  3030      This is the reverse operation to 'storeOn:'.
  3030 
  3031 
  3031      WARNING: storeOn: does not handle circular references and multiple
  3032      WARNING: storeOn: does not handle circular references and multiple
  3032 	      references to the same object.
  3033               references to the same object.
  3033 	      Use #storeBinary:/readBinaryFrom: for this."
  3034               Use #storeBinary:/readBinaryFrom: for this."
  3034 
  3035 
  3035     ^ self
  3036     ^ self
  3036 	readFrom:aStream
  3037         readFrom:aStream
  3037 	onError:[ self conversionErrorSignal
  3038         onError:[ self conversionErrorSignal
  3038 		    raiseWith:aStream errorString:'conversion error for: ' , self name ]
  3039                     raiseWith:aStream errorString:' for: ' , self name ]
  3039 
  3040 
  3040     "
  3041     "
  3041      |s|
  3042      |s|
  3042      s := WriteStream on:String new.
  3043      s := WriteStream on:String new.
  3043      #(1 2 3 4) storeOn:s.
  3044      #(1 2 3 4) storeOn:s.
  3099      Behavior>>readFrom: and Behavior>>readFrom:onError:"
  3100      Behavior>>readFrom: and Behavior>>readFrom:onError:"
  3100 
  3101 
  3101     ^ self
  3102     ^ self
  3102         readFromString:aString
  3103         readFromString:aString
  3103         onError:[ 
  3104         onError:[ 
  3104             self conversionErrorSignal raiseErrorString:'expected: ' , self name 
  3105             self conversionErrorSignal raiseWith:aString errorString:' - expected: ' , self name
  3105         ]
  3106         ]
  3106 
  3107 
  3107     "
  3108     "
  3108      Integer readFromString:'12345678901234567890'
  3109      Integer readFromString:'12345678901234567890'
  3109      Point readFromString:'1@2'
  3110      Point readFromString:'1@2'