From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Thu, 28 Feb 2019 13:32:48 +0000 (+0000)
Subject: wip
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ian/git?a=commitdiff_plain;h=2c4afb02e7325f8d204afaee921c0305e379940e;p=pandemic-rising-tide.git

wip
---

diff --git a/generate-board b/generate-board
index bd0276a..d981907 100755
--- a/generate-board
+++ b/generate-board
@@ -66,14 +66,17 @@ sub read_faces () {
 	$adj->{Ends}[$endi] = $edges[ ($ei + $endi) % @edges ];
       }
     }
+    @edges = ();
+    $rr = undef;
   };
   my $vxname;
   for (;;) {
     $!=0; $_=<P> // confess $!;
     last if m/^\&$/;
     if (m/^$sre$/) {
+      my $new_face= $2;
       $process_rr->() if $rr;
-      $rr= prs2rr($2);
+      $rr= prs2rr($new_face);
     } elsif (m/^\s+$sre$/) {
       confess unless $rr;
       $vxname = $2;