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 /MLRISC/releases/release-110.65/make.sml
ViewVC logotype

View of /MLRISC/releases/release-110.65/make.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 2705 - (download) (annotate)
Fri Jun 8 04:28:20 2007 UTC (12 years, 1 month ago) by blume
File size: 534 byte(s)
Release 110.65
(*
 * Regenerates all the machine description generated files.
 * This works for only 110.39+
 *)
(* val () = #set(CM.symval "UNSHARED_MLRISC") (SOME 1); *)

(* From 110.57 on, we need the following new magic *)

fun set f = #set(CM.Anchor.anchor f) (SOME "cm");
val _ = app set ["Control.cm", "Lib.cm", "Graphs.cm", "MLRISC.cm",
                 "MLTREE.cm"];

fun b() = CM.make "Tools/MDL/sources.cm"; 
val _ = b(); 
fun c f = MDLGen.gen(f^"/"^f^".mdl");
val _ = app c
[ "x86"
, "sparc"
, "alpha"
, "hppa"
, "ppc"
(* , "mips" *)
];

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