String concatenation: Difference between revisions

Content added Content deleted
(→‎{{header|Vlang}}: Rename "Vlang" in "V (Vlang)")
m (Added Oberon-02)
Tag: Made through Tor
Line 1,559: Line 1,559:
}
}
}</syntaxhighlight>
}</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}}==
=={{header|Objective-C}}==