toke.c:S_scan_heredoc: Add comment about <<\FOO

diff --git a/toke.c b/toke.c
index 7592453..ff19bdc 100644 (file)
--- a/toke.c
+++ b/toke.c
@@ -9504,6 +9504,7 @@ S_scan_heredoc(pTHX_ register char *s)
     }
     else {
        if (*s == '\\')
+            /* <<\FOO is equivalent to <<'FOO' */
            s++, term = '\'';
        else
            term = '"';