jstest: from-pieces: Show more things, including z and zg

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>

diff --git a/jstest/from-pieces b/jstest/from-pieces
index 690494d8bbe112d8800dede74c3ee3eb4f82814d..da644ead109c7142039ecd14cbea94e18e6e8fc6 100755 (executable)
--- a/jstest/from-pieces
+++ b/jstest/from-pieces
@@ -20,11 +20,12 @@ my @pieces = map {
   [
    $p->{z},
    $p->{zg},
-   (sprintf "    sp!(%7s, %s, %s),%s\n",
+   (sprintf "    sp!(%8s, %s, %3s), // %s %s%s\n",
     "\"$id\"",
     $p->{pinned} ? 'true' : 'false',
     $p->{moveable} eq 'IfWresting' ? 'No' : $p->{moveable},
-    $p->{held} ? " // HELD $p->{held}" : '',
+    $p->{z}, $p->{zg},
+    $p->{held} ? " HELD $p->{held}" : '',
    )
   ]
 } keys %$data;