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/compiler/CodeGen/main/mlriscGen.sml
ViewVC logotype

Diff of /sml/trunk/src/compiler/CodeGen/main/mlriscGen.sml

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

revision 1682, Tue Nov 9 23:48:09 2004 UTC revision 1683, Thu Nov 11 00:12:41 2004 UTC
# Line 1582  Line 1582 
1582                (*esac*))                (*esac*))
1583              | gen(PURE(P.pure_arith{oper=P.notb, kind}, [v], x, _, e), hp) =              | gen(PURE(P.pure_arith{oper=P.notb, kind}, [v], x, _, e), hp) =
1584                 (case kind                 (case kind
1585                  of P.UINT 32 => defI32(x,M.XORB(ity, regbind v,                  of (P.UINT 32 | P.INT 32) =>
1586                                                  LW 0wxFFFFFFFF), e, hp)                       defI32(x,M.XORB(ity, regbind v,  LW 0wxFFFFFFFF), e, hp)
1587                   | P.INT 32 => defI32(x,M.XORB(ity, regbind v,                   | (P.UINT 31 | P.INT 31) =>
1588                                                 LW 0wxFFFFFFFF), e, hp)                       defI31(x,M.SUB(ity, zero, regbind v), e, hp)
1589                   | P.UINT 31 => defI31(x,M.SUB(ity, zero, regbind v), e, hp)                   | _ => error "unexpected numkind in pure notb arithop"
                  | P.INT 31 => defI31(x,M.SUB(ity, zero, regbind v), e, hp)  
                  | _ => error "unexpected numkind in pure unary arithop"  
1590                (*esac*))                (*esac*))
1591                | gen (PURE(P.pure_arith{oper=P.~, kind}, [v], x, _, e), hp) =
1592                    (case kind of
1593                         (P.UINT 32 | P.INT 32) =>
1594                           defI32 (x, M.SUB(ity, zero, regbind v), e, hp)
1595                       | (P.UINT 31 | P.INT 31) =>
1596                           defI31 (x, M.SUB (ity, LI 2, regbind v), e, hp)
1597                       | _ => error "unexpected numkind in pure ~ primop")
1598              | gen(PURE(P.copy ft, [v], x, _, e), hp) =              | gen(PURE(P.copy ft, [v], x, _, e), hp) =
1599                 (case ft                 (case ft
1600                  of (31,32) =>                  of (31,32) =>

Legend:
Removed from v.1682  
changed lines
  Added in v.1683

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