basis-library/libs/basis-1997/top-level/basis.sml

   1 (* Copyright (C) 2002-2005 Henry Cejtin, Matthew Fluet, Suresh
   2  *    Jagannathan, and Stephen Weeks.
   3  *
   4  * MLton is released under a BSD-style license.
   5  * See the file MLton-LICENSE for details.
   6  *)
   7
   8 structure Basis1997: BASIS_1997 =
   9    struct
  10       open Basis2002
  11       structure SML90 = SML90
  12
  13       structure VectorArray = VectorArrayConvert
  14                               (structure Vector = Vector
  15                                structure VectorSlice = VectorSlice
  16                                structure Array = Array
  17                                structure ArraySlice = ArraySlice)
  18       structure Vector = VectorArray.Vector
  19       structure Array = VectorArray.Array
  20       structure BoolVectorArray = MonoVectorArrayArray2Convert
  21                                   (structure Vector = BoolVector
  22                                    structure VectorSlice = BoolVectorSlice
  23                                    structure Array = BoolArray
  24                                    structure ArraySlice = BoolArraySlice
  25                                    structure Array2 = BoolArray2)
  26       structure BoolVector = BoolVectorArray.Vector
  27       structure BoolArray = BoolVectorArray.Array
  28       structure BoolArray2 = BoolVectorArray.Array2
  29       structure CharVectorArray = MonoVectorArrayArray2Convert
  30                                   (structure Vector = CharVector
  31                                    structure VectorSlice = CharVectorSlice
  32                                    structure Array = CharArray
  33                                    structure ArraySlice = CharArraySlice
  34                                    structure Array2 = CharArray2)
  35       structure CharVector = CharVectorArray.Vector
  36       structure CharArray = CharVectorArray.Array
  37       structure CharArray2 = CharVectorArray.Array2
  38       structure IntVectorArray = MonoVectorArrayArray2Convert
  39                                  (structure Vector = IntVector
  40                                   structure VectorSlice = IntVectorSlice
  41                                   structure Array = IntArray
  42                                   structure ArraySlice = IntArraySlice
  43                                   structure Array2 = IntArray2)
  44       structure IntVector = IntVectorArray.Vector
  45       structure IntArray = IntVectorArray.Array
  46       structure IntArray2 = IntVectorArray.Array2
  47       structure Int32VectorArray = MonoVectorArrayArray2Convert
  48                                    (structure Vector = Int32Vector
  49                                     structure VectorSlice = Int32VectorSlice
  50                                     structure Array = Int32Array
  51                                     structure ArraySlice = Int32ArraySlice
  52                                     structure Array2 = Int32Array2)
  53       structure Int32Vector = Int32VectorArray.Vector
  54       structure Int32Array = Int32VectorArray.Array
  55       structure Int32Array2 = Int32VectorArray.Array2
  56       structure RealVectorArray = MonoVectorArrayArray2Convert
  57                                   (structure Vector = RealVector
  58                                    structure VectorSlice = RealVectorSlice
  59                                    structure Array = RealArray
  60                                    structure ArraySlice = RealArraySlice
  61                                    structure Array2 = RealArray2)
  62       structure RealVector = RealVectorArray.Vector
  63       structure RealArray = RealVectorArray.Array
  64       structure RealArray2 = RealVectorArray.Array2
  65       structure Real64VectorArray = MonoVectorArrayArray2Convert
  66                                     (structure Vector = Real64Vector
  67                                      structure VectorSlice = Real64VectorSlice
  68                                      structure Array = Real64Array
  69                                      structure ArraySlice = Real64ArraySlice
  70                                      structure Array2 = Real64Array2)
  71       structure Real64Vector = Real64VectorArray.Vector
  72       structure Real64Array = Real64VectorArray.Array
  73       structure Real64Array2 = Real64VectorArray.Array2
  74       structure Word8VectorArray = MonoVectorArrayArray2Convert
  75                                    (structure Vector = Word8Vector
  76                                     structure VectorSlice = Word8VectorSlice
  77                                     structure Array = Word8Array
  78                                     structure ArraySlice = Word8ArraySlice
  79                                     structure Array2 = Word8Array2)
  80       structure Word8Vector = Word8VectorArray.Vector
  81       structure Word8Array = Word8VectorArray.Array
  82       structure Word8Array2 = Word8VectorArray.Array2
  83
  84       structure Pack32Big = PackWord32Big
  85       structure Pack32Little = PackWord32Little
  86
  87       structure Text = TextConvert (structure Text = Text)
  88       structure Char = Text.Char
  89       structure String = Text.String
  90       structure Substring = Text.Substring
  91
  92       structure IEEEReal = IEEEReal1997
  93       structure LargeReal = RealConvert(structure Real = LargeReal)
  94       structure Real = RealConvert(structure Real = Real)
  95       structure Real64 = RealConvert(structure Real = Real64)
  96
  97       structure Posix = PosixConvert(structure Posix = Posix)
  98
  99       structure OS = OSConvert(structure OS = OS)
 100       structure Timer = TimerConvert(structure Timer = Timer)
 101
 102       structure IO = IOConvert(structure IO = IO)
 103       structure TextIO = TextIOConvert(structure TextIO = TextIO)
 104       structure BinIO = BinIOConvert(structure BinIO = BinIO)
 105
 106       structure Unix = UnixConvert (structure Unix = Unix)
 107    end