From eaf038f50ee9cc0ba4e7b9c48e2bd78408d4b5bf Mon Sep 17 00:00:00 2001
From: Paul Beckingham <paul@beckingham.net>
Date: Tue, 29 Dec 2015 15:54:09 -0500
Subject: [PATCH] Tests: Added ::getDigit

---
 test/pig.t.cpp | 25 +++++++++++++++++++------
 1 file changed, 19 insertions(+), 6 deletions(-)

diff --git a/test/pig.t.cpp b/test/pig.t.cpp
index 4e74f65e..406c7b5f 100644
--- a/test/pig.t.cpp
+++ b/test/pig.t.cpp
@@ -31,17 +31,30 @@
 ////////////////////////////////////////////////////////////////////////////////
 int main (int, char**)
 {
-  UnitTest t (4);
+  UnitTest t (10);
 
-  Pig p0 (" one");
-  t.ok (p0.skipWS (),    "' one' -> 'one' true");
-  t.is (p0.dump (),      "≪ one≫ l4 m1 c1", "dump");
+  // Pig::skipWS
+  Pig p0 ("  one");
+  t.ok (p0.skipWS (),    "skipWS '  one' -> true");
+  t.is (p0.dump (),      "≪  one≫ l5 m2 c2", "dump");
   t.diag (p0.dump ());
 
-  t.notok (p0.skipWS (), "'one' -> 'one' false");
-  t.is (p0.dump (),      "≪ one≫ l4 m1 c1", "dump");
+  t.notok (p0.skipWS (), "skipWS 'one' -> false");
+  t.is (p0.dump (),      "≪  one≫ l5 m2 c2", "dump");
   t.diag (p0.dump ());
 
+  // Pig::getDigit
+  Pig p1 (" 123");
+  int n;
+  t.notok (p1.getDigit (n), "getDigit ' 123' --> false");
+  t.ok (p1.skipWS (),       "skipWS ' 123' --> true");
+  t.is (p1.dump (),         "≪ 123≫ l4 m1 c1", "dump");
+  t.diag (p1.dump ());
+  t.ok (p1.getDigit (n),    "getDigit '123' --> true");
+  t.is (n, 1,               "getDigit '123' --> '1'");
+  t.is (p1.dump (),         "≪ 123≫ l4 m2 c2", "dump");
+  t.diag (p1.dump ());
+
   return 0;
 }