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

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

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

revision 1013, Tue Jan 15 16:23:15 2002 UTC revision 1014, Tue Jan 15 16:32:43 2002 UTC
# Line 64  Line 64 
64      val addLabel    = IntHashTable.insert labelMap      val addLabel    = IntHashTable.insert labelMap
65    
66      (* Data in text segment is read-only *)      (* Data in text segment is read-only *)
67      datatype segment_t = TEXT | DATA | RO_DATA      datatype segment_t = TEXT | DATA | RO_DATA | BSS
68      val segmentF    = ref TEXT      val segmentF    = ref TEXT
69    
70      (* the block names *)      (* the block names *)
# Line 268  Line 268 
268         | PB.DATA_READ_ONLY => startSegment(RO_DATA)         | PB.DATA_READ_ONLY => startSegment(RO_DATA)
269         | PB.DATA => startSegment(DATA)         | PB.DATA => startSegment(DATA)
270         | PB.TEXT => startSegment(TEXT)         | PB.TEXT => startSegment(TEXT)
271           | PB.BSS => startSegment(BSS)
272         | PB.SECTION _ =>         | PB.SECTION _ =>
273            (case !segmentF            (case !segmentF
274              of TEXT => error "addPseudoOp: SECTION in TEXT segment"              of TEXT => error "addPseudoOp: SECTION in TEXT segment"
# Line 281  Line 282 
282         | PB.FLOAT _  => addData("FLOAT")         | PB.FLOAT _  => addData("FLOAT")
283         | PB.ASCII _  => addData("ASCII")         | PB.ASCII _  => addData("ASCII")
284         | PB.ASCIIZ _ => addData("ASCIIZ")         | PB.ASCIIZ _ => addData("ASCIIZ")
285           | PB.SPACE _  => addData("SPACE")
286         | PB.IMPORT _ => addData("IMPORT")         | PB.IMPORT _ => addData("IMPORT")
287         | PB.EXPORT _ => addData("EXPORT")         | PB.EXPORT _ => addData("EXPORT")
288         | PB.EXT _ => addData("EXT")         | PB.EXT _ => addData("EXT")

Legend:
Removed from v.1013  
changed lines
  Added in v.1014

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