Copy a string: Difference between revisions
Content deleted Content added
No edit summary |
|||
Line 1,885: | Line 1,885: | ||
<lang zkl>"abc".copy() // noop</lang> |
<lang zkl>"abc".copy() // noop</lang> |
||
=={{header|zonnon}}== |
|||
<lang zonnon> |
|||
module Main; |
|||
var |
|||
s,r: string; |
|||
c: array 60 of char; |
|||
begin |
|||
s := "plain string";r := s; writeln(s); |
|||
(* copy string to array of char *) |
|||
copy(s,c);c[0] := 'P'; |
|||
(* copy array of char to string *) |
|||
copy(c,r);writeln(r); |
|||
end Main. |
|||
</lang> |
|||
=={{header|ZX Spectrum Basic}}== |
=={{header|ZX Spectrum Basic}}== |
||