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

SCM Repository

[smlnj] Annotation of /MLRISC/branches/amd64/make.sml
ViewVC logotype

Annotation of /MLRISC/branches/amd64/make.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 4385 - (view) (download)

1 : leunga 744 (*
2 :     * Regenerates all the machine description generated files.
3 : leunga 1203 * This works for only 110.39+
4 : leunga 744 *)
5 : allenleung 1890 (* val () = #set(CM.symval "UNSHARED_MLRISC") (SOME 1); *)
6 :    
7 :     (* From 110.57 on, we need the following new magic *)
8 :    
9 :     fun set f = #set(CM.Anchor.anchor f) (SOME "cm");
10 :     val _ = app set ["Control.cm", "Lib.cm", "Graphs.cm", "MLRISC.cm",
11 :     "MLTREE.cm"];
12 :    
13 : leunga 744 fun b() = CM.make "Tools/MDL/sources.cm";
14 : leunga 775 val _ = b();
15 : leunga 744 fun c f = MDLGen.gen(f^"/"^f^".mdl");
16 : leunga 775 val _ = app c
17 : leunga 1203 [ "x86"
18 : mrainey 2828 , "amd64"
19 : leunga 1203 , "sparc"
20 :     , "alpha"
21 :     , "hppa"
22 :     , "ppc"
23 :     (* , "mips" *)
24 : leunga 744 ];

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