RosettaCodeData/Task/String-prepend/Mercury/string-prepend.mercury

:- module string_prepend.
:- interface.
:- import_module io.
:- pred main(io::di, io::uo) is det.
:- implementation.
:- import_module string.
main(!IO) :-
    S = "World!\n",
    io.write_string("Hello " ++ S, !IO).