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/compiler/CodeGen/cpscompile/memDisambig.sml
ViewVC logotype

Diff of /sml/trunk/compiler/CodeGen/cpscompile/memDisambig.sml

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

revision 4812, Wed Sep 12 21:56:57 2018 UTC revision 4813, Wed Sep 12 23:55:25 2018 UTC
# Line 50  Line 50 
50         | C.PURE(P.fwrap, _, _, _, e) => sizeOf(e, hp+frecord(1))         | C.PURE(P.fwrap, _, _, _, e) => sizeOf(e, hp+frecord(1))
51         | C.PURE(P.mkspecial, _, _, _, e) => sizeOf(e, hp+8)         | C.PURE(P.mkspecial, _, _, _, e) => sizeOf(e, hp+8)
52         | C.PURE(P.makeref, _, _, _, e) => sizeOf(e, hp+8)         | C.PURE(P.makeref, _, _, _, e) => sizeOf(e, hp+8)
53         | C.PURE(P.i32wrap, _, _, _, e) => sizeOf(e, hp+record(2))         | C.PURE(P.i32wrap, _, _, _, e) => sizeOf(e, hp+record(2))       (* 64BIT: FIXME *)
54         | C.PURE(P.newarray0, _, _, _, e) => sizeOf(e, hp+(4*5))         | C.PURE(P.newarray0, _, _, _, e) => sizeOf(e, hp+(4*5))
55         | C.PURE(_, _, _, _, e) => sizeOf(e, hp)         | C.PURE(_, _, _, _, e) => sizeOf(e, hp)
56         | C.ARITH(_, _, _, _, e) => sizeOf(e, hp)         | C.ARITH(_, _, _, _, e) => sizeOf(e, hp)
# Line 166  Line 166 
166           | C.ARITH(_, _, _, _, e) => iter(e, hp)           | C.ARITH(_, _, _, _, e) => iter(e, hp)
167           | C.PURE(P.mkspecial, [i,v], x, _, e) => record([(v, offp0)], x, e)           | C.PURE(P.mkspecial, [i,v], x, _, e) => record([(v, offp0)], x, e)
168           | C.PURE(P.fwrap, [u], x, _, e) => frecord([(u, offp0)], x, e)           | C.PURE(P.fwrap, [u], x, _, e) => frecord([(u, offp0)], x, e)
169           | C.PURE(P.i32wrap, [u], x, _, e) =>           | C.PURE(P.i32wrap, [u], x, _, e) =>           (* 64BIT: FIXME *)
170               record([(u, offp0),(C.INT 0, offp0)], x, e)               record([(u, offp0),(C.INT 0, offp0)], x, e)
171           | C.PURE(P.makeref, [v], x, _, e) => let           | C.PURE(P.makeref, [v], x, _, e) => let
172               val uses =               val uses =

Legend:
Removed from v.4812  
changed lines
  Added in v.4813

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