RosettaCodeData/Task/Copy-a-string/Icon/copy-a-string.icon

7 lines
97 B
Plaintext

procedure main()
a := "qwerty"
b := a
b[2+:4] := "uarterl"
write(a," -> ",b)
end