t_ok_comments.mod 241 B

1234567
  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.