here 1.2.11 → 1.2.12

raw patch · 2 files changed

+4/−4 lines, 2 files

Files

• here.cabal +1/−1
• src/Data/String/Here/Interpolated.hs +3/−3

@@ -1,5 +1,5 @@ name: here-version: 1.2.11+version: 1.2.12 synopsis: Here docs & interpolated strings via quasiquotation description: Here docs & interpolated strings via quasiquotation license: BSD3

@@ -86,10 +86,10 @@ p_interp = manyTill p_stringPart eof  p_stringPart :: Parser StringPart-p_stringPart = try p_anti <|> p_esc <|> p_lit+p_stringPart = p_anti <|> p_esc <|> p_lit  p_anti :: Parser StringPart-p_anti = Anti <$> between p_antiOpen p_antiClose p_antiExpr+p_anti = Anti <$> between (try p_antiOpen) p_antiClose p_antiExpr  p_antiOpen :: Parser String p_antiOpen = string "${"@@ -145,6 +145,6 @@  p_lit :: Parser StringPart p_lit = fmap Lit $-  try (litCharTil $ lookAhead p_antiOpen <|> lookAhead (string "\\"))+  try (litCharTil $ try $ lookAhead p_antiOpen <|> lookAhead (string "\\"))     <|> litCharTil eof   where litCharTil = manyTill $ noneOf ['\\']