1 files changed, 10 insertions, 0 deletions

diff --git a/test-data/extract-data.sh b/test-data/extract-data.sh
new file mode 100755
index 0000000..a0e5af8
--- /dev/null
+++ b/test-data/extract-data.sh
@@ -0,0 +1,10 @@
+#!/bin/bash
+
+# This script extracts examples from OBJ.spec for testing purposes.
+
+IFS='' read -r -d '' prog <<'EOF'
+BEGINFILE { g=0; }
+          /^    (v[tnp]? [^is]|#|mtllib\b|g\b)/ {if(!inside){ g++; inside=1; }}
+          /^[^ ]/{inside=0;}                    { if(inside) {print $0 > sprintf("%02d",g) ".obj"}}
+EOF
+awk "$prog" ../doc/OBJ.spec