String concatenation: Difference between revisions
m
Added Oberon-02
(→{{header|Vlang}}: Rename "Vlang" in "V (Vlang)") |
Deadmarshal (talk | contribs) m (Added Oberon-02) Tag: Made through Tor |
||
Line 1,559:
}
}</syntaxhighlight>
=={{header|Oberon}}==
<syntaxhighlight lang="oberon">MODULE Concat;
IMPORT Out,Strings;
VAR
S1:ARRAY 16 OF CHAR;
S2:ARRAY 8 OF CHAR;
PS1,PS2:POINTER TO ARRAY OF CHAR;
BEGIN
(* Static *)
S1 := "Hello ";
S2 := "literal";
Strings.Append(S2, S1);
Out.String(S1); Out.Ln;
(* Dynamic *)
NEW(PS1, 16);
NEW(PS2, 8);
COPY("Hello ", PS1^);
COPY("literal", PS2^);
Strings.Append(PS2^, PS1^);
Out.String(PS1^); Out.Ln;
END Concat.
</syntaxhighlight>
=={{header|Objective-C}}==
|