Performance testing on INSERT/APPEND on strings

gistfile1.txt

Red []

recycle/off
s: make string! 20e6

clear s
append s "hello"
recycle
mem0: stats
clock [ loop 1e5 [insert s [1 3.14 (1.0, 2,0)]] ]
print ["mem:" stats - mem0]

clear s
append s "hello"
recycle
mem0: stats
clock [ insert/dup s [1 3.14 (1.0, 2,0)] to-integer 1e6]
print ["mem:" stats - mem0]

clear s
recycle
mem0: stats
clock [ loop 1e6 [insert tail s [1 3.14 (1.0, 2,0)]] ]
print ["mem:" stats - mem0]

clear s
recycle
mem0: stats
clock [ insert/dup tail s [1 3.14 (1.0, 2,0)] to-integer 1e6]
print ["mem:" stats - mem0]

clear s
append s "hello"
recycle
mem0: stats
clock [ loop 1e4 [insert s [<div><i><b> Hello </b></i><u> World! </u></div>] ]]
print ["mem:" stats - mem0]

clear s
append s "hello"
recycle
mem0: stats
clock [ loop 1e5 [append s [1 3.14 (1.0, 2,0)]] ]
print ["mem:" stats - mem0]

clear s
append s "hello"
recycle
mem0: stats
clock [ append/dup s [1 3.14 (1.0, 2,0)] to-integer 1e6]
print ["mem:" stats - mem0]

clear s
recycle
mem0: stats
clock [ loop 1e6 [append s [1 3.14 (1.0, 2,0)]] ]
print ["mem:" stats - mem0]

clear s
recycle
mem0: stats
clock [ append/dup s [1 3.14 (1.0, 2,0)] to-integer 1e6]
print ["mem:" stats - mem0]

clear s
append s "hello"
recycle
mem0: stats
clock [ loop 1e4 [append s [<div><i><b> Hello </b></i><u> World! </u></div>] ]]
print ["mem:" stats - mem0]

should be recycle/off ? ;)

otherwise RAM waste is 2x underreported :)

Good catch! recycle off is Rebol2 syntax... Hard to get rid of old habits...

Fixed in the above code now.