021caedf9b1e3801ce074e05b87c15746df5f048
1 OrderedCollection extend
[
4 dict
:= Dictionary new
.
5 1 to: self size
by: 2 do:
6 [ :i | dict
add: (self at: i
) ->
(self at: i
+ 1) ].
14 text
:= self copyFrom: 2 to: self size
- 1.
15 text
:= text
copyReplaceAll: '\"' with: '"'.
16 text
:= text
copyReplaceAll: '\n' with: '
18 text
:= text
copyReplaceAll: '\\' with: '\'.
24 text := self copyReplaceAll: '\' with: '\\'.
25 text
:= text
copyReplaceAll: '
27 text
:= text
copyReplaceAll: '"' with: '\"'.