char *add(char *part1, char *part2) {
int len;
char *p1, *p2, *res;
for (len = 0, p1 = part1; *p1 != 0; len++, p1++);
for (p2 = part2; *p2 != 0; len++, p2++);
try {
res = new char[++len];
} catch (...) {
return NULL;
}
for (p1 = res, p2 = part1; *p2 != 0; p1++, p2++)
*p1 = *p2;
for (p2 = part2; *p2 != 0; p1++, p2++)
*p1 = *p2;
*p1 = 0;
return res;
}
-module(main).
...
do_something(String) ->
io:format("~p~n", [String]).
...
start() ->
spawn(main, do_something, "Hello"),
spawn(main, do_something, ", world!").