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

SCM Repository

[diderot] Diff of /branches/vis12/src/compiler/translate/translate-basis.sml
ViewVC logotype

Diff of /branches/vis12/src/compiler/translate/translate-basis.sml

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

revision 1687, Wed Jan 25 13:02:32 2012 UTC revision 1688, Wed Jan 25 13:36:13 2012 UTC
# Line 86  Line 86 
86            val tbl = VTbl.mkTable (128, Fail "Translate table")            val tbl = VTbl.mkTable (128, Fail "Translate table")
87            in            in
88              List.app (VTbl.insert tbl) [              List.app (VTbl.insert tbl) [
89                  (BV.at_Td,              fn (y, [tv], args) => assign(y, Op.Append(pruneTy tv), args)),                  (BV.at_Td,              fn (y, [tv], args) => assign(y, Op.Prepend(pruneTy tv), args)),
90                  (BV.at_dT,              fn (y, [tv], args) => assign(y, Op.Prepend(pruneTy tv), args)),                  (BV.at_dT,              fn (y, [tv], args) => assign(y, Op.Append(pruneTy tv), args)),
91                  (BV.at_dd,              fn (y, [tv], args) => assign(y, Op.Concat(pruneTy tv), args)),                  (BV.at_dd,              fn (y, [tv], args) => assign(y, Op.Concat(pruneTy tv), args)),
92                  (BV.lt_ii,              simpleOp(Op.LT DstTy.IntTy)),                  (BV.lt_ii,              simpleOp(Op.LT DstTy.IntTy)),
93                  (BV.lt_rr,              simpleOp(Op.LT DstTy.realTy)),                  (BV.lt_rr,              simpleOp(Op.LT DstTy.realTy)),

Legend:
Removed from v.1687  
changed lines
  Added in v.1688

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