def unapply(self,value):
if type(value) == list and len(value) > 0:
iterator = iter(value)
return self.head.unapply(iterator.next()) |bind| \
(lambda rhead:self.tail.unapply(list(iterator)) |bind| \
(lambda rtail:option(MatchResult(value,[]) << rhead << rtail)))
else:
return option()
def unapply(self, value):
if type(value) == list and len(value) > 0:
iterator = iter(value)
return self.head.unapply(iterator.next()) |bind| \
(lambda rhead:self.tail.unapply(list(iterator)) |bind| \
(lambda rtail:option(MatchResult(value,[]) << rhead << rtail)))
else:
return option()
def unapply(self, value):
return self.value.unapply(value) | bind | (
lambda res: option(MatchResult(value, [res.value]) << res))
def unapply(self, value):
return option(MatchResult(value, []))
def unapply(self, value):
try:
return option(MatchResult(self.match(value), []))
except:
return option()
def compareWith(self, value):
return option(True if isinstance(value, self.value) else None)
def unapply(self, value):
return option(re.match(self.value, value)) | bind | (
lambda res: option(MatchResult(res.groups(), [])))
def __call__(self, stream):
return option(re.match(self.regex, stream.value())) | bind | (
lambda result: option(stream.offset(len(result.group()))) | bind |
(lambda _: option(
self.kind(result.groups()[len(result.groups()) - 1]))))
def compareWith(self,value):
return option(True if self.value == value else None)
def unapply(self,value):
return self.value.unapply(value) |bind| (lambda res:option(MatchResult(value,[res.value]) << res))
def unapply(self,value):
return option(MatchResult(value,[]))
def unapply(self,value):
try:
return option(MatchResult(self.match(value),[]))
except:
return option()
def compareWith(self,value):
return option(True if isinstance(value,self.value) else None)
def __call__(self,stream):
return option(re.match(self.regex,stream.value())) |bind| (
lambda result: option(stream.offset(len(result.group()))) |bind| (
lambda _: option(self.kind(result.groups()[len(result.groups())-1]))))
def test(a, expected):
return (a | bind | (lambda _: option(True))).join() == expected
def unapply(self,value):
return option(MatchResult(value,[]) if set(value) == set([]) else None)
def unapply(self,value):
return self.compareWith(value) |bind| (lambda _:option(MatchResult(value,[])))
def compareWith(self, value):
return option(True if self.value == value else None)
def unapply(self, value):
return option(
MatchResult(value, []) if set(value) == set([]) else None)
def unapply(self, value):
return self.compareWith(value) | bind | (
lambda _: option(MatchResult(value, [])))
def unapply(self,value):
return option(re.match(self.value,value)) |bind| (lambda res:option(MatchResult(res.groups(),[])))
def test(a,expected):
return (a |bind| (lambda _:option(True))).join() == expected