RosettaCodeData/Task/Loops-Infinite/Modula-3/loops-infinite.mod3

LOOP
  IO.Put("SPAM\n");
END;