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/CodeGen/sparc/sparcMLTreeExtComp.sml
ViewVC logotype

Annotation of /sml/trunk/src/compiler/CodeGen/sparc/sparcMLTreeExtComp.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 840 - (view) (download)

1 : blume 840 functor SparcMLTreeExtComp
2 :     (structure T : MLTREE where Extension = Sparc_SMLNJMLTreeExt
3 :     structure I : SPARCINSTR where T = T) : MLTREE_EXTENSION_COMP =
4 :     struct
5 :     structure T = T
6 :     structure I = I
7 :     structure C = I.C
8 :     structure Ext = Sparc_SMLNJMLTreeExt
9 :     structure SparcCompInstrExt = SparcCompInstrExt(I)
10 :    
11 :     type reducer =
12 :     (I.instruction,C.cellset,I.operand,I.addressing_mode) T.reducer
13 :    
14 :     fun unimplemented _ = MLRiscErrorMsg.impossible "SparcMLTreeExtComp"
15 :    
16 :     val compileSext = SparcCompInstrExt.compileSext
17 :     val compileRext = unimplemented
18 :     val compileCCext = unimplemented
19 :     val compileFext = unimplemented
20 :     end

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