4 Dec
2007
4 Dec
'07
8:23 p.m.
Iavor Diatchki wrote:
server text | Just xs <- parse text , | "field1" `elem` xs = ... do one thing ... | "field2" `elem` xs = ... do something else ...
server _ = ... invalid request ...
What about: server text | Just xs <- parse text = let x | "field1" `elem` xs = error "... do one thing ..." | "field2" `elem` xs = error "... do something else ..." in x server _ = error "... invalid request ..." Regards, Zun.