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

SCM Repository

[smlnj] Diff of /sml/trunk/src/MLRISC/sparc/sparc.mdl
ViewVC logotype

Diff of /sml/trunk/src/MLRISC/sparc/sparc.mdl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 746, Fri Dec 8 04:16:09 2000 UTC revision 775, Fri Jan 12 01:17:51 2001 UTC
# Line 454  Line 454 
454        datatype operand =        datatype operand =
455           REG of $GP              ``<GP>''           rtl: $r[GP]           REG of $GP              ``<GP>''           rtl: $r[GP]
456         | IMMED of int            ``<int>''          rtl: immed int         | IMMED of int            ``<int>''          rtl: immed int
457         | LAB of LabelExp.labexp  ``<labexp>''       rtl: labexp         | LAB of T.labexp  ``<labexp>''       rtl: labexp
458         | LO of LabelExp.labexp   ``%lo(<labexp>)''  rtl: lo(labexp)         | LO of T.labexp   ``%lo(<labexp>)''  rtl: lo(labexp)
459         | HI of LabelExp.labexp   ``%hi(<labexp>)''  rtl: hi(labexp)         | HI of T.labexp   ``%hi(<labexp>)''  rtl: hi(labexp)
460    
461        type addressing_mode = C.cell * operand        type addressing_mode = C.cell * operand
462    
# Line 861  Line 861 
861     structure SSA =     structure SSA =
862     struct     struct
863        fun operand(ty,I.REG r)   = T.REG(ty, r)        fun operand(ty,I.REG r)   = T.REG(ty, r)
864          | operand(ty,I.IMMED i) = T.LI i          | operand(ty,I.IMMED i) = T.LI(IntInf.fromInt i)
865          (*| operand(ty,I.LAB le)  = T.LABEL le*)          (*| operand(ty,I.LAB le)  = T.LABEL le*)
866          | operand(ty,_) = error "operand"          | operand(ty,_) = error "operand"
867     end     end

Legend:
Removed from v.746  
changed lines
  Added in v.775

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