view exercises/src/RegEx.hs @ 27:a316877ed3d9

week 11
author Markus Kaiser <markus.kaiser@in.tum.de>
date Wed, 09 Jan 2013 21:00:13 +0100
parents
children
line wrap: on
line source

module RegEx where

data RegEx =
    Any |
    One [(Char, Char)] |
    Repeat RegEx (Int, Maybe Int) |
    Concat RegEx RegEx |
    Alt RegEx RegEx
  deriving (Eq, Show)