disasm: Remove extra annotations

Since we check annotations before updating the current sub
(since the sub needs to add all the active annotations anyway),
remove useless annotations from the end of the old sub.

src/disasm.winxed

@@ -233,7 +233,19 @@ function read_packfile(var packfile) {
         // XXX: Doesn't handle overlapping subs
         // But that's okay right now, nobody generates them
         if (sub_i < subs_size && subs[sub_i].start_offs() == pc) {
-            // TODO: Pop off unneeded annotations and debugs?
+            // Pop off unneeded annotations and debugs?
+            for(i = elements(sub.ops) - 1; i >= 0; --i) {
+                // XXX: Is there a better way to do this comparison?
+                switch (typeof(sub.ops[i])) {
+                case 'PACT;Packfile;Annotation':
+                case 'PACT;Packfile;Debug':
+                    delete sub.ops[i];
+                    break;
+                default:
+                    i = 0;
+                    break;
+                }
+            }
 
             sub = subs[sub_i++];
             sub_end = sub.end_offs();