(* Copyright (C) 1999-2002 Henry Cejtin, Matthew Fluet, Suresh
 *    Jagannathan, and Stephen Weeks.
 * Copyright (C) 1997-1999 NEC Research Institute.
 *
 * MLton is released under the GNU General Public License (GPL).
 * Please see the file MLton-LICENSE for license information.
 *)
type int = Int.t

signature COMPILE_STRUCTS =
   sig
   end

signature COMPILE =
   sig
      include COMPILE_STRUCTS
      structure Ssa : SSA_TREE

      val compile: File.t list -> Ssa.Program.t
(*      val forceBasisLibrary: Dir.t -> unit *)
      (* output a C file to print out the basis constants. *)
(*      val outputBasisConstants: Out.t -> unit *)
      val setBasisLibraryDir: Dir.t -> unit
   end