X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=src%2Fyard.dcl;h=bc4f940ef3e77836a8f327d016747111920a4653;hb=ca00099482644c76d6d918f536f69db32ac85058;hp=38ce3688f62aa3023d51cdd0714b7243a0dc2e8a;hpb=3d1c57710eb0b86f13df392f03131157aec22c21;p=cc1516.git

diff --git a/src/yard.dcl b/src/yard.dcl
index 38ce368..bc4f940 100644
--- a/src/yard.dcl
+++ b/src/yard.dcl
@@ -18,6 +18,8 @@ instance Alternative (Parser a)
 
 instance toString Error
 
+//(`until`) infix 1
+
 runParser :: (Parser a b) [a] -> (Either Error b, [a])
 (<?>) :: (Parser a b) (String, Int) -> Parser a b
 fail :: Parser a b