awk: fix memory leak (can affect large file processing)

1 files changed, 18 insertions, 18 deletions

diff --git a/editors/awk.c b/editors/awk.c
index 9af6ecc5b..d0b03c373 100644
--- a/editors/awk.c
+++ b/editors/awk.c
@@ -12,34 +12,34 @@
 #include <math.h>
 
 
-#define MAXVARFMT       240
-#define MINNVBLOCK      64
+#define MAXVARFMT       240
+#define MINNVBLOCK      64
 
 /* variable flags */
-#define VF_NUMBER       0x0001  /* 1 = primary type is number */
-#define VF_ARRAY        0x0002  /* 1 = it's an array */
+#define VF_NUMBER       0x0001  /* 1 = primary type is number */
+#define VF_ARRAY        0x0002  /* 1 = it's an array */
 
-#define VF_CACHED       0x0100  /* 1 = num/str value has cached str/num eq */
-#define VF_USER         0x0200  /* 1 = user input (may be numeric string) */
-#define VF_SPECIAL      0x0400  /* 1 = requires extra handling when changed */
-#define VF_WALK         0x0800  /* 1 = variable has alloc'd x.walker list */
-#define VF_FSTR         0x1000  /* 1 = string points to fstring buffer */
-#define VF_CHILD        0x2000  /* 1 = function arg; x.parent points to source */
-#define VF_DIRTY        0x4000  /* 1 = variable was set explicitly */
+#define VF_CACHED       0x0100  /* 1 = num/str value has cached str/num eq */
+#define VF_USER         0x0200  /* 1 = user input (may be numeric string) */
+#define VF_SPECIAL      0x0400  /* 1 = requires extra handling when changed */
+#define VF_WALK         0x0800  /* 1 = variable has alloc'd x.walker list */
+#define VF_FSTR         0x1000  /* 1 = var::string points to fstring buffer */
+#define VF_CHILD        0x2000  /* 1 = function arg; x.parent points to source */
+#define VF_DIRTY        0x4000  /* 1 = variable was set explicitly */
 
 /* these flags are static, don't change them when value is changed */
-#define VF_DONTTOUCH (VF_ARRAY | VF_SPECIAL | VF_WALK | VF_CHILD | VF_DIRTY)
+#define VF_DONTTOUCH    (VF_ARRAY | VF_SPECIAL | VF_WALK | VF_CHILD | VF_DIRTY)
 
 /* Variable */
 typedef struct var_s {
-        unsigned short type;            /* flags */
+        unsigned short type;            /* flags */
         double number;
         char *string;
         union {
-                int aidx;                               /* func arg idx (for compilation stage) */
-                struct xhash_s *array;  /* array ptr */
-                struct var_s *parent;   /* for func args, ptr to actual parameter */
-                char **walker;                  /* list of array elements (for..in) */
+                int aidx;               /* func arg idx (for compilation stage) */
+                struct xhash_s *array;  /* array ptr */
+                struct var_s *parent;   /* for func args, ptr to actual parameter */
+                char **walker;          /* list of array elements (for..in) */
         } x;
 } var;
 
@@ -740,7 +740,7 @@ static var *copyvar(var *dest, const var *src)
 {
         if (dest != src) {
                 clrvar(dest);
-                dest->type |= (src->type & ~VF_DONTTOUCH);
+                dest->type |= (src->type & ~(VF_DONTTOUCH | VF_FSTR));
                 dest->number = src->number;
                 if (src->string)
                         dest->string = xstrdup(src->string);