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/flowgraph/gasPseudoOps.sml
ViewVC logotype

Diff of /sml/trunk/src/MLRISC/flowgraph/gasPseudoOps.sml

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

revision 1012, Tue Jan 15 16:16:39 2002 UTC revision 1018, Wed Jan 16 17:21:14 2002 UTC
# Line 89  Line 89 
89              (*esac*)) :: map (fn lexp => lexpToString lexp ^ " ") i)              (*esac*)) :: map (fn lexp => lexpToString lexp ^ " ") i)
90    
91      | toString(PB.ASCII s)        = Fmt.format ".ascii \"%s\"" [Fmt.STR s]      | toString(PB.ASCII s)        = Fmt.format ".ascii \"%s\"" [Fmt.STR s]
92      | toString(PB.ASCIIZ s)       = Fmt.format ".asciiz \"%s\"" [Fmt.STR s]      | toString(PB.ASCIIZ s)       =
93             Fmt.format ".ascii \"%s\"" [Fmt.STR (String.toCString s)]
94    
95      | toString(PB.SPACE sz)       = Fmt.format ".space %d" [Fmt.INT sz]      | toString(PB.SPACE sz)       = Fmt.format ".space %d" [Fmt.INT sz]
96    

Legend:
Removed from v.1012  
changed lines
  Added in v.1018

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