String concatenation: Difference between revisions
Content added Content deleted
(→{{header|Vlang}}: Rename "Vlang" in "V (Vlang)") |
Deadmarshal (talk | contribs) 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}}== |