Listing:

    1  MODULE Comments;
    2  (* outer comment (* nested comment *) still outer *)
    3  VAR x : INTEGER; (* trailing comment *)
    4  BEGIN
    5    x := 1; (* set x *)
    6    x := x + 1 (* no semicolon before END is ok if single stat? here two stats need ";" *)
    7  END Comments.

    0 errors