1structure PolyML =
2struct
3
4  structure Compiler = struct
5    val compilerVersionNumber = 0
6  end
7
8  val pointerEq = MLton.eq
9
10end
11
12structure SML90 =
13struct
14
15  exception Interrupt
16
17end
18