From: ian <ian>
Date: Fri, 30 Dec 2005 01:24:19 +0000 (+0000)
Subject: sort code addresses too
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ijackson/git?a=commitdiff_plain;h=ef21eb07956f724648b41a4b43cefe6c60bad6fb;p=trains.git

sort code addresses too
---

diff --git a/detpic/crashread b/detpic/crashread
index d9a73df..7507732 100755
--- a/detpic/crashread
+++ b/detpic/crashread
@@ -126,9 +126,9 @@ lappend sections {0x00000f00 {=SFRs=} 0}
 #lappend sections {0x00000f60 {==========SFRs,ACS===========} 0}
 
 lappend sections [list 0x1000 =END= 0]
-set sections [lsort $sections]
-set symbols [lsort $symbols]
-#debug >$symbols<
+foreach tosort {sections symbols symbolsbylockind(program)} {
+    set $tosort [lsort [set $tosort]]
+}
 
 proc addendlast {v ev evn} {
     upvar #0 $v syms