From e86c3c67d60c8b240b1693cda7af5079e39e8dce Mon Sep 17 00:00:00 2001
From: P. J. McDermott <pj@pehjota.net>
Date: Sun, 21 Feb 2016 03:02:35 -0500
Subject: Preserve leading backslashes in words

---
(limited to 'parsing/parse.sh')

diff --git a/parsing/parse.sh b/parsing/parse.sh
index ddcdd97..600a247 100644
--- a/parsing/parse.sh
+++ b/parsing/parse.sh
@@ -660,4 +660,8 @@ try()
 #try 'foo <<-EOF' "${HT}bar" "${HT}EOF"
 #try 'foo <<EOF' '$(bar)' 'EOF'
 try 'foo <<E"O"F' '$(bar)' 'EOF'
+try 'foo <<"EOF"' '$(bar)' 'EOF'
+try 'foo <<E\OF' '$(bar)' 'EOF'
+try 'foo <<\EOF' '$(bar)' 'EOF'
 #try 'foo <<EOF1; bar <<EOF2' 'baz' 'EOF1' 'qux' 'EOF2'
+try '\foo'
--
cgit v0.9.1