blob: a0e5af8d53e6a990ee9a5ff2158edf1873768ae1 (
plain)
1
2
3
4
5
6
7
8
9
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
|