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

SCM Repository

[diderot] Diff of /branches/charisee_dev/src/compiler/ein/printer.sml
ViewVC logotype

Diff of /branches/charisee_dev/src/compiler/ein/printer.sml

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

revision 2552, Fri Feb 28 19:03:27 2014 UTC revision 2553, Sun Mar 2 19:53:33 2014 UTC
# Line 23  Line 23 
23  fun handleSumRange (mu,lb,ub)= String.concat[(handleIndex mu),"[",Int.toString(lb),"-",Int.toString(ub),"]"]  fun handleSumRange (mu,lb,ub)= String.concat[(handleIndex mu),"[",Int.toString(lb),"-",Int.toString(ub),"]"]
24    
25  fun printbody term = (case term  fun printbody term = (case term
26      of E.Const r => Real.toString(r)      of E.Const r => Int.toString(r)
27      | E.Tensor(id, []) =>String.concat[" S",Int.toString(id)]      | E.Tensor(id, []) =>String.concat[" S",Int.toString(id)]
28      | E.Tensor(id, alpha) =>String.concat[" T",Int.toString(id),"_",handleAlpha alpha]      | E.Tensor(id, alpha) =>String.concat[" T",Int.toString(id),"_",handleAlpha alpha]
29      | E.Field(id, []) =>String.concat[" F",Int.toString(id)]      | E.Field(id, []) =>String.concat[" F",Int.toString(id)]

Legend:
Removed from v.2552  
changed lines
  Added in v.2553

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