MLton MLTONWIKIVERSION

SMLNJDeviations

Home Index

Here are some deviations of SML/NJ from The Definition of Standard ML. Some of these are documented in the SML '97 Conversion Guide. Since MLton does not deviate from the Definition, you should look here if you are having trouble porting a program from MLton to SML/NJ or vice versa. If you discover other deviations of SML/NJ that aren't listed here, please send mail to MLton@mlton.org.

- SML/NJ allows spaces in long identifiers, as in `S . x`. Section 2.5 of the Definition implies that `S . x` should be treated as three separate lexical items.

- SML/NJ rejects

      (op *)

  as an unmatched close comment.

- SML/NJ allows `=` to be rebound by the declaration:

      val op = = 13

  This is explicitly forbidden on page 5 of the Definition.

- SML/NJ allows rebinding `true`, `false`, `nil`, `::`, and `ref` by the declarations:

      fun true () = ()
      fun false () = ()
      fun nil () = ()
      fun op :: () = ()
      fun ref () = ()

  This is explicitly forbidden on page 9 of the Definition.

- SML/NJ extends the syntax of the language to allow vector expressions and patterns like the following:

      val v = #[1,2,3]
      val #[x,y,z] = v

- SML/NJ extends the syntax of the language to allow or patterns like the following:

      datatype foo = Foo of int | Bar of int
      val (Foo x | Bar x) = Foo 13

- SML/NJ allows higher-order functors, that is, functors can be components of structures and can be passed as functor arguments and returned as functor results. As a consequence, SML/NJ allows abbreviated functor definitions, as in the following:

      signature S =
        sig
          type t
          val x: t
        end
      functor F (structure A: S): S =
        struct
          type t = A.t * A.t
          val x = (A.x, A.x)
        end
      functor G = F

- SML/NJ extends the syntax of the language to allow functor and signature definitions to occur within the scope of `local` and `structure` declarations.

- SML/NJ allows duplicate type specifications in signatures when the duplicates are introduced by `include`, as in the following:

      signature SIG1 =
         sig
            type t
            type u
         end
      signature SIG2 =
         sig
            type t
            type v
         end
      signature SIG =
         sig
            include SIG1
            include SIG2
         end

  This is disallowed by rule 77 of the Definition.

- SML/NJ allows sharing constraints between type abbreviations in signatures, as in the following:

      signature SIG =
         sig
            type t = int * int
            type u = int * int
            sharing type t = u
         end

  These are disallowed by rule 78 of the Definition.

- SML/NJ disallows multiple `where type` specifications of the same type name, as in the following

      signature S =
        sig
           type t
           type u = t
        end
        where type u = int

  This is allowed by rule 84 of the Definition.

- SML/NJ allows `and` in `sharing` specs in signatures, as in

      signature S =
         sig
            type t
            type u
            type v
            sharing type t = u
             type u = v
         end

- SML/NJ does not expand the `withtype` derived form as described by the Definition. According to page 55 of the Definition, the type bindings of a `withtype` declaration are substituted simultaneously in the connected datatype. Consider the following program.

      type u = real
      datatype a =
          A of t
        | B of u
      withtype u = int
      and t = u

  According to the Definition, it should be expanded to the following.

      type u = real
      datatype a =
          A of u
        | B of int

  However, SML/NJ expands `withtype` bindings sequentially, meaning that earlier bindings are expanded within later ones. Hence, the above program is expanded to the following.

      type u = real
      datatype a =
          A of int
        | B of int

- SML/NJ allows `withtype` specifications in signatures.

- SML/NJ allows a `where` structure specification that is similar to a `where type` specification. For example:

      structure S = struct type t = int end
      signature SIG =
        sig
           structure T : sig type t end
        end where T = S

  This is equivalent to:

      structure S = struct type t = int end
      signature SIG =
        sig
           structure T : sig type t end
        end where type T.t = S.t

  SML/NJ also allows a definitional structure specification that is similar to a definitional type specification. For example:

      structure S = struct type t = int end
      signature SIG =
        sig
           structure T : sig type t end = S
        end

  This is equivalent to the previous examples and to:

      structure S = struct type t = int end
      signature SIG =
        sig
           structure T : sig type t end where type t = S.t
        end

- SML/NJ disallows binding non-datatypes with datatype replication. For example, it rejects the following program that should be allowed according to the Definition.

      type ('a, 'b) t = 'a * 'b
      datatype u = datatype t

  This idiom can be useful when one wants to rename a type without rewriting all the type arguments. For example, the above would have to be written in SML/NJ as follows.

      type ('a, 'b) t = 'a * 'b
      type ('a, 'b) u = ('a, 'b) t

- SML/NJ disallows sharing a structure with one of its substructures. For example, SML/NJ disallows the following.

      signature SIG =
         sig
            structure S:
               sig
                  type t
                  structure T: sig type t end
               end
            sharing S = S.T
         end

  This signature is allowed by the Definition.

- SML/NJ disallows polymorphic generalization of refutable patterns. For example, SML/NJ disallows the following.

      val [x] = [[]]
      val _ = (1 :: x, "one" :: x)

## Deviations from the Basis Library Specification

Here are some deviations of SML/NJ from the Basis Library Specification.

- SML/NJ exposes the equality of the `vector` type in structures such as `Word8Vector` that abstractly match `MONO_VECTOR`, which says `type vector`, not `eqtype vector`. So, for example, SML/NJ accepts the following program:

      fun f (v: Word8Vector.vector) = v = v

Last edited on 2007-08-15 22:07:20 by MatthewFluet.