sort code addresses too

diff --git a/detpic/crashread b/detpic/crashread
index d9a73df3d6f8b0b726887ea55b68c25fbd4ff64f..75077326f0518dab77e1b18ead8b8ca02dc14288 100755 (executable)
--- 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