Cope with islands with names ending in y, from land

[ypp-sc-tools.db-live.git] / pctb / structure.c

diff --git a/pctb/structure.c b/pctb/structure.c
index d777d5713697d6f9c32ddfc998c7f97ed8416c6c..d574e2960737d622629761190a8d569ac37436a2 100644 (file)
--- a/pctb/structure.c
+++ b/pctb/structure.c
@@ -803,7 +803,7 @@ void find_islandname(void) {
        nspaces++;
        might_be_colon=0;
       } else {
-       if (!(pattern & 1UL<<31) && nruns==2 && runs[1]==runs[0]) {
+       if (nruns==2 && runs[1]==runs[0]) {
          if (!nspaces) {
            if (pattern==colon_pattern)
              goto ok_might_be_colon;
@@ -812,6 +812,8 @@ void find_islandname(void) {
            might_be_colon=1;
            goto ok_might_be_colon;
          }
+       } else if (nruns==1 && runs[0]==1 && might_be_colon) {
+         goto colon_found;
        }
        might_be_colon=0;
       ok_might_be_colon: