Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] View of /sml/trunk/src/compiler/TopLevel/interact/evalloop.sig
ViewVC logotype

View of /sml/trunk/src/compiler/TopLevel/interact/evalloop.sig

Parent Directory Parent Directory | Revision Log Revision Log


Revision 879 - (download) (as text) (annotate)
Thu Jul 19 18:59:38 2001 UTC (18 years, 2 months ago) by blume
File size: 1002 byte(s)
extensive organizational changes
(* Copyright 1996 by Bell Laboratories *)
(* evalloop.sig *)
 
signature EVALLOOP =
sig
  exception Interrupt 
  type interactParams = 
       { compManagerHook : (Ast.dec * EnvRef.envref 
                            * EnvRef.envref -> unit) option ref,
         baseEnvRef      : EnvRef.envref,
         localEnvRef     : EnvRef.envref,
         transform       : Absyn.dec -> Absyn.dec,
         instrument      : { source: Source.inputSource,
                             compenv: StaticEnv.staticEnv}
			   -> Absyn.dec -> Absyn.dec,
         perform         : CodeObj.executable -> CodeObj.executable,
         isolate         : CodeObj.executable -> CodeObj.executable,
         printer         : Environment.environment -> PrettyPrint.ppstream 
                           -> (Absyn.dec * Access.lvar list) -> unit}

  val stdParams   : interactParams
  val interact    : interactParams -> unit
  val evalStream  : interactParams -> string * TextIO.instream -> unit

end (* signature EVALLOOP *)

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0