diff --git a/src/draw.c b/src/draw.c
index c5c59b54..00101ac5 100644
--- a/src/draw.c
+++ b/src/draw.c
@@ -347,8 +347,9 @@ void draw_symbol(int what,int c, int n,int layer,short tmp_flip, short rot,
         double xoffset, double yoffset)
                             /* draws current layer only, should be called within  */
 {                           /* a "for(i=0;i<cadlayers;i++)" loop */
-  int j, textlayer, hide = 0;
+  int k, j, textlayer, hide = 0;
   double x0,y0,x1,y1,x2,y2;
+  double *x, *y; /* polygon point arrays */
   short flip;
   xLine line;
   xRect rect;
@@ -432,19 +433,16 @@ void draw_symbol(int what,int c, int n,int layer,short tmp_flip, short rot,
     for(j=0;j< symptr->polygons[layer];j++)
     {
       polygon = (symptr->poly[layer])[j];
-      {   /* scope block so we declare some auxiliary arrays for coord transforms. */
-        int k;
-        double *x = my_malloc(34, sizeof(double) * polygon.points);
-        double *y = my_malloc(35, sizeof(double) * polygon.points);
-        for(k=0;k<polygon.points;k++) {
-          ROTATION(rot, flip, 0.0,0.0,polygon.x[k],polygon.y[k],x[k],y[k]);
-          x[k]+= x0;
-          y[k] += y0;
-        }
-        drawpolygon(c, NOW, x, y, polygon.points, polygon.fill, polygon.dash); /* added fill */
-        my_free(718, &x);
-        my_free(719, &y);
+      x = my_malloc(34, sizeof(double) * polygon.points);
+      y = my_malloc(35, sizeof(double) * polygon.points);
+      for(k=0;k<polygon.points;k++) {
+        ROTATION(rot, flip, 0.0,0.0,polygon.x[k],polygon.y[k],x[k],y[k]);
+        x[k]+= x0;
+        y[k] += y0;
       }
+      drawpolygon(c, NOW, x, y, polygon.points, polygon.fill, polygon.dash); /* added fill */
+      my_free(718, &x);
+      my_free(719, &y);
     }
     for(j=0;j< symptr->arcs[layer];j++)
     {
diff --git a/xschem_library/devices/res_ac.sym b/xschem_library/devices/res_ac.sym
index 788f52b7..90fb539c 100644
--- a/xschem_library/devices/res_ac.sym
+++ b/xschem_library/devices/res_ac.sym
@@ -1,4 +1,4 @@
-v {xschem version=2.9.8 file_version=1.2}
+v {xschem version=3.0.0 file_version=1.2 }
 G {}
 K {type=resistor
 format="@name @pinlist @value ac=@ac m=@m"
@@ -26,10 +26,11 @@ L 4 2.5 -22.5 7.5 -22.5 {}
 L 4 5 -25 5 -20 {}
 B 5 -2.5 -32.5 2.5 -27.5 {name=P dir=inout propag=1 pinnumber=1}
 B 5 -2.5 27.5 2.5 32.5 {name=M dir=inout propag=0 pinnumber=2}
-T {@name} 15 -18.75 0 0 0.2 0.2 {}
-T {@value} 15 -6.25 0 0 0.2 0.2 {}
+T {@name} 15 -13.75 0 0 0.2 0.2 {}
+T {AC=@ac} -15 3.75 0 1 0.2 0.2 {}
 T {@#0:pinnumber} -10 -26.25 0 1 0.2 0.2 {layer=13}
 T {@#1:pinnumber} -10 16.25 0 1 0.2 0.2 {layer=13}
 T {@#0:net_name} 10 -28.75 0 0 0.15 0.15 {layer=15}
 T {@#1:net_name} 10 20 0 0 0.15 0.15 {layer=15}
-T {m=@m} 15 6.25 0 0 0.2 0.2 {}
+T {m=@m} 15 1.25 0 0 0.2 0.2 {}
+T {DC=@value} -15 -11.25 0 1 0.2 0.2 {}