Home My Page Projects Code Snippets Project Openings diderot
Summary Activity Tracker Tasks SCM

SCM Repository

[diderot] Diff of /branches/vis15/src/compiler/cfg-ir/ssa-fn.sml
ViewVC logotype

Diff of /branches/vis15/src/compiler/cfg-ir/ssa-fn.sml

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

revision 3586, Thu Jan 14 14:49:31 2016 UTC revision 3613, Fri Jan 22 22:37:54 2016 UTC
# Line 309  Line 309 
309          fun toString (V{name, id, ...}) = name ^ Stamp.toString id          fun toString (V{name, id, ...}) = name ^ Stamp.toString id
310          fun getDef x = (case binding x          fun getDef x = (case binding x
311                 of VB_RHS rhs => (case rhs                 of VB_RHS rhs => (case rhs
312                       of GLOBAL gv => (case GlobalVar.bindingOf gv                       of GLOBAL gv => if GlobalVar.isInput gv
313                              then rhs (* inputs could be different at runtime! *)
314                              else (case GlobalVar.bindingOf gv
315                             of SOME x => getDef x                             of SOME x => getDef x
316                              | NONE => rhs                              | NONE => rhs
317                            (* end case *))                            (* end case *))

Legend:
Removed from v.3586  
changed lines
  Added in v.3613

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