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/mltree/mltree-rtl.sml
ViewVC logotype

Diff of /sml/trunk/src/MLRISC/mltree/mltree-rtl.sml

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

revision 591, Mon Apr 3 01:19:20 2000 UTC revision 593, Tue Apr 4 07:26:33 2000 UTC
# Line 156  Line 156 
156                       | r  => ":"^ #rexp pr r                       | r  => ":"^ #rexp pr r
157                val body = "$"^k^"["^ lhs pr e^r^"]"                val body = "$"^k^"["^ lhs pr e^r^"]"
158            in  if t = t' orelse t = 0 then body else            in  if t = t' orelse t = 0 then body else
159                showEnd endian^showTy t'^showTy t^body                showEnd endian^showTy t'^showTy t^" "^body
160            end            end
161        and lhs pr (T.REG(ty,r)) = #dstReg pr (ty,r)        and lhs pr (T.REG(ty,r)) = #dstReg pr (ty,r)
162          | lhs pr e = #rexp pr e          | lhs pr e = #rexp pr e

Legend:
Removed from v.591  
changed lines
  Added in v.593

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