abaco: cleanup, handle image/x-icon, don't use backspace as a hotkey, and remove...

[plan9front.git] / sys / src / cmd / acid / util.c

diff --git a/sys/src/cmd/acid/util.c b/sys/src/cmd/acid/util.c
index b47d4cbbb3422538684b0bfd8757b5a4ce4702ef..46431f75ec263d976ac3dc93c569581baac89147 100644 (file)
--- a/sys/src/cmd/acid/util.c
+++ b/sys/src/cmd/acid/util.c
@@ -7,6 +7,7 @@
 #include "acid.h"
 #include "y.tab.h"
 
+char afmt = 'X';
 static int syren;
 
 Lsym*
@@ -88,7 +89,7 @@ varsym(void)
                        l->v->type = TINT;
                        l->v->ival = v;
                        if(l->v->comt == 0)
-                               l->v->fmt = 'X';
+                               l->v->fmt = 'A';
 
                        /* Enter as list of { name, type, value } */
                        list = al(TSTRING);
@@ -101,7 +102,7 @@ varsym(void)
                        list->ival = s->type;
                        list->next = al(TINT);
                        list = list->next;
-                       list->fmt = 'X';
+                       list->fmt = l->v->fmt;
                        list->ival = v;
 
                }
@@ -122,6 +123,12 @@ varreg(void)
        Reglist *r;
        List **tail, *li;
 
+       if(mach->szaddr == 8){
+               afmt = 'Y';
+               fsize['a'] = fsize[afmt];
+               fsize['A'] = fsize[afmt];
+       }
+
        l = mkvar("registers");
        v = l->v;
        v->set = 1;