Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Tracker SCM

SCM Repository

[smlnj] View of /sml/branches/SMLNJ/src/compiler/TopLevel/bootstrap/boot-env.sml
ViewVC logotype

View of /sml/branches/SMLNJ/src/compiler/TopLevel/bootstrap/boot-env.sml

Parent Directory Parent Directory | Revision Log Revision Log

Revision 172 - (download) (annotate)
Sat Nov 7 22:27:15 1998 UTC (23 years, 10 months ago)
File size: 617 byte(s)
This commit was manufactured by cvs2svn to create branch 'SMLNJ'.
(* Copyright 1998 by Lucent Technologies *)
(* boot-env.sml *)

(* Run the BootEnvF functor which builds the boot environments.
 *   It is important that this functor is done executing by the time
 *   the code for the InteractiveSystem runs.  Otherwise we would never
 *   be able to get rid of CM/CMB from an interactive heap image.
 *  -M.Blume (6/1998)
structure BootEnv =
    BootEnvF (structure BF = Compiler.Binfile
	      val architecture = Compiler.architecture
	      val setRetargetPervStatEnv = CMB.setRetargetPervStatEnv
	      fun cmbmake bindir = (CMB.make' (SOME bindir);
				    CMB.wipeOut ()))

ViewVC Help
Powered by ViewVC 1.0.0