SeqColl.st
changeset 1188 a9efdd724afc
parent 1159 dcbb3e070a05
child 1245 c8afea3d5af0
equal deleted inserted replaced
1187:619ff79bc665 1188:a9efdd724afc
   484      #(1 2 3 4) asOrderedCollection startsWith:#(1 2 3)
   484      #(1 2 3 4) asOrderedCollection startsWith:#(1 2 3)
   485     "
   485     "
   486 ! !
   486 ! !
   487 
   487 
   488 !SequenceableCollection methodsFor:'converting'!
   488 !SequenceableCollection methodsFor:'converting'!
       
   489 
       
   490 asStringWith:sepChar
       
   491     "return a string generated by concatenating my elements 
       
   492      (which must be strings or nil) and embedding sepChar characters in between.
       
   493      Nil entries and empty strings are counted as empty lines."
       
   494 
       
   495     ^ self asStringWith:sepChar from:1 to:(self size)
       
   496 !
       
   497 
       
   498 asStringWith:sepCharacter from:firstLine to:lastLine
       
   499     "return part of myself as a string with embedded sepCharacters.
       
   500      My elements must be strings or nil; nil entries and empty strings are
       
   501      taken as empty lines."
       
   502 
       
   503     ^ self 
       
   504         asStringWith:sepCharacter 
       
   505         from:firstLine 
       
   506         to:lastLine
       
   507         compressTabs:false
       
   508         final:nil
       
   509     "
       
   510      creating entries for searchpath:
       
   511 
       
   512      #('foo' 'bar' 'baz' '/foo/bar') asStringWith:$;   
       
   513 
       
   514      #('foo' 'bar' 'baz' '/foo/bar') asStringWith:$: from:1 to:3   
       
   515     "
       
   516 
       
   517     "Modified: 23.2.1996 / 15:28:55 / cg"
       
   518 !
   489 
   519 
   490 asStringWith:sepCharacter from:firstLine to:lastLine compressTabs:compressTabs final:endCharacter
   520 asStringWith:sepCharacter from:firstLine to:lastLine compressTabs:compressTabs final:endCharacter
   491     "return part of myself as a string with embedded sepCharacters.
   521     "return part of myself as a string with embedded sepCharacters.
   492      My elements must be strings or nil; nil entries and empty strings are
   522      My elements must be strings or nil; nil entries and empty strings are
   493      taken as empty lines.
   523      taken as empty lines.
  2502 ! !
  2532 ! !
  2503 
  2533 
  2504 !SequenceableCollection class methodsFor:'documentation'!
  2534 !SequenceableCollection class methodsFor:'documentation'!
  2505 
  2535 
  2506 version
  2536 version
  2507     ^ '$Header: /cvs/stx/stx/libbasic/Attic/SeqColl.st,v 1.53 1996-04-12 16:24:13 cg Exp $'
  2537     ^ '$Header: /cvs/stx/stx/libbasic/Attic/SeqColl.st,v 1.54 1996-04-16 11:50:01 ca Exp $'
  2508 ! !
  2538 ! !