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 /sml/trunk/src/compiler/OldCGen/mips/mipsgen.sml
ViewVC logotype

Annotation of /sml/trunk/src/compiler/OldCGen/mips/mipsgen.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 16 - (view) (download)

1 : monnier 16 (* mipsgen.sml
2 :     *
3 :     * COPYRIGHT (c) 1996 Bell Laboratories.
4 :     *
5 :     *)
6 :    
7 :     functor MipsCodeGen(Endian : ENDIAN) : CODEGENERATOR =
8 :     FLINTComp(
9 :     structure CoderInstr = MipsInstr(structure E=Endian)
10 :     structure MachSpec = MipsSpec(Endian)
11 :     structure MipsCoder = Coder(
12 :     structure M=CoderInstr
13 :     and E=MipsMCode(structure MSpec = MachSpec and E=Endian))
14 :     structure Gen = CPSgen(structure M = MipsCM(structure C=MipsCoder
15 :     and E=Endian
16 :     and MachSpec=MachSpec)
17 :     structure MachSpec = MachSpec)
18 :     fun collect () = (MipsCoder.finish(); KeepMipsMCode.getCodeString())
19 :     )
20 :    
21 :    
22 :     (*
23 :     * $Log: mipsgen.sml,v $
24 :     * Revision 1.2 1998/02/12 22:18:48 jhr
25 :     * Finished removing references to System.Tags in MIPS code generators.
26 :     *
27 :     * Revision 1.1.1.1 1997/01/14 01:38:39 george
28 :     * Version 109.24
29 :     *
30 :     *)

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