X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=test%2Fshell%2Fmanpage-barriers.test;fp=test%2Fshell%2Fmanpage-barriers.test;h=4b8c1658e501fbadc7262a4b347bfdd6686adcfb;hb=5b514425904aca70652668a48ed4b950e4cec15e;hp=0000000000000000000000000000000000000000;hpb=a2fe46950a637e64fb5056fce091bf398b983a79;p=hath.git

diff --git a/test/shell/manpage-barriers.test b/test/shell/manpage-barriers.test
new file mode 100644
index 0000000..4b8c165
--- /dev/null
+++ b/test/shell/manpage-barriers.test
@@ -0,0 +1,18 @@
+# Test the --barriers examples from the manpage.
+
+# The first one matches a line it probably shouldn't.
+echo "127.0.0.100" | grep -P $(dist/build/hath/hath <<< "127.0.0.1/32")
+>>>
+127.0.0.100
+>>>= 0
+
+# This one uses --barriers, and doesn't match that same line.
+echo "127.0.0.100" | grep -P $(dist/build/hath/hath -b <<< "127.0.0.1/32")
+>>>
+>>>= 1
+
+# But, using barriers makes the regexp match something it shouldn't.
+echo "x127.0.0.1x" | grep -Po $(dist/build/hath/hath -b <<< "127.0.0.1/32")
+>>>
+x127.0.0.1x
+>>>= 0