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-fp.sml
ViewVC logotype

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

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

revision 1023, Thu Jan 17 14:02:05 2002 UTC revision 1024, Thu Jan 17 19:30:59 2002 UTC
# Line 56  Line 56 
56   *)   *)
57    
58  local  local
59     val debug = false         (* set this to true to debug this module     val debug = true         (* set this to true to debug this module
60                                * set this to false for production use.                                * set this to false for production use.
61                                *)                                *)
62     val debugLiveness = true (* debug liveness analysis *)     val debugLiveness = true (* debug liveness analysis *)
# Line 1798  Line 1798 
1798                     | [r] => ST.push(stack, CB.registerNum r)                     | [r] => ST.push(stack, CB.registerNum r)
1799                     | _   =>                     | _   =>
1800                       error "can't return more than one fp argument (yet)";                       error "can't return more than one fp argument (yet)";
1801                     DONE code                     FINISH code
1802                 end                 end
1803                 fun x86trans instr =                 fun x86trans instr =
1804                  (case instr                  (case instr

Legend:
Removed from v.1023  
changed lines
  Added in v.1024

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