diff src/a09.c @ 71:eb9be32c701c

fix leval
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Sun, 05 Aug 2018 22:17:44 +0900
parents 2088fd998865
children 82d03e816deb
line wrap: on
line diff
--- a/src/a09.c	Sun Aug 05 16:12:30 2018 +0900
+++ b/src/a09.c	Sun Aug 05 22:17:44 2018 +0900
@@ -1545,6 +1545,12 @@
      } else if(strcmp(v[i],"-l")==0) {
        listname=v[i+1];
        i+=2;
+     } else if(strcmp(v[i],"-D")==0) {
+       struct symrecord * p;
+       p=findsym(v[i+1]);
+       p->value = 1;
+       p->cat = 0;
+       i+=2;
      } else if(strcmp(v[i],"-I")==0) {
        struct incl *j = (struct incl *)malloc(sizeof(struct incl));
        j->name = v[i+1];