bug fix

diff --git a/modules/src/read_em/reade.c b/modules/src/read_em/reade.c
index 16ba0c0..7c71bb3 100644 (file)
--- a/modules/src/read_em/reade.c
+++ b/modules/src/read_em/reade.c
@@ -619,7 +619,12 @@ gethead()
        argnum = 1;
        for (;;) {      
                EM_lineno++;
-               if ((c = getbyte()) == EOF) return 0;
+               c = getbyte();
+               if (c == COMMENTSTARTER) {
+                       do      c = getbyte();
+                       while (c != '\n' && c != EOF);
+               }
+               if (c == EOF) return 0;
                if (c == '\n') continue;
                if (isspace(c)) {
                        c = nospace();