[Bug algol68/123847] Uninitialized public string variable in a module

[jemarch at gcc dot gnu.org via Gcc-bugs]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=123847

--- Comment #1 from Jose E. Marchesi <jemarch at gcc dot gnu.org> ---
Isn't the implicit else-part in the conditional that is not
initialized to empty string?  `originator' is not involved in string
concatenation in that expression.

Try:

  fputs(fd, (originator /= "" | ": " | "") + msg + "'n"