//
// CANS2KR.VDM                                          (C) C.Z.  23.04.96
//
//   wandelt ANSI-C-Kommentare (//)  in K&R (/*...*/) um
//

S("//", NOERR)
while (! ERROR_FLAG) {
  DelChar(2)
  InsText("/*")
  EoL
  InsText(" */")
  S("//", NOERR)
}