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

Diff of /sml/trunk/src/MLRISC/x86/mltree/x86.sml

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

revision 695, Mon Aug 7 23:57:38 2000 UTC revision 717, Sun Nov 5 15:07:51 2000 UTC
# Line 1062  Line 1062 
1062              in  mark(fld(fty', ea), an);              in  mark(fld(fty', ea), an);
1063                  if fd = ST0 then () else emit(fstp(fty, I.FDirect fd))                  if fd = ST0 then () else emit(fstp(fty, I.FDirect fd))
1064              end              end
1065            | doFexpr(fty, T.FEXT fexp, fd, an) =
1066                (ExtensionComp.compileFext (reducer()) {e=fexp, fd=fd, an=an};
1067                 if fd = ST0 then () else emit(fstp(fty, I.FDirect fd))
1068                )
1069          | doFexpr(fty, e, fd, an) =          | doFexpr(fty, e, fd, an) =
1070              (reduceFexp(fty, e, []);              (reduceFexp(fty, e, []);
1071               if fd = ST0 then () else mark(fstp(fty, I.FDirect fd), an)               if fd = ST0 then () else mark(fstp(fty, I.FDirect fd), an)

Legend:
Removed from v.695  
changed lines
  Added in v.717

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