Owothia graduates, or something. Mostly I don't want infrastructure to depend on stuff in //users. Does anyone know where owothia is running anyways? Change-Id: I198c7ac935736c7aee3ba4fbda1453b82aa10283 Reviewed-on: https://cl.tvl.fyi/c/depot/+/3103 Tested-by: BuildkiteCI Reviewed-by: grfn <grfn@gws.fyi>
		
			
				
	
	
		
			40 lines
		
	
	
	
		
			1.4 KiB
		
	
	
	
		
			Diff
		
	
	
	
	
	
			
		
		
	
	
			40 lines
		
	
	
	
		
			1.4 KiB
		
	
	
	
		
			Diff
		
	
	
	
	
	
| diff --git a/Text/Regex/TDFA/Text.hs b/Text/Regex/TDFA/Text.hs
 | |
| index c4ef9db..9299272 100644
 | |
| --- a/Text/Regex/TDFA/Text.hs
 | |
| +++ b/Text/Regex/TDFA/Text.hs
 | |
| @@ -38,13 +38,6 @@ import Text.Regex.TDFA.NewDFA.Uncons(Uncons(uncons))
 | |
|  import qualified Text.Regex.TDFA.NewDFA.Engine as Engine(execMatch)
 | |
|  import qualified Text.Regex.TDFA.NewDFA.Tester as Tester(matchTest)
 | |
|  
 | |
| -instance Extract T.Text where
 | |
| -  before = T.take; after = T.drop; empty = T.empty
 | |
| -
 | |
| -instance Uncons T.Text where
 | |
| -  {- INLINE uncons #-}
 | |
| -  uncons = T.uncons
 | |
| -
 | |
|  instance RegexContext Regex T.Text T.Text where
 | |
|    match = polymatch
 | |
|    matchM = polymatchM
 | |
| diff --git a/Text/Regex/TDFA/Text/Lazy.hs b/Text/Regex/TDFA/Text/Lazy.hs
 | |
| index 73ca4a0..52958fb 100644
 | |
| --- a/Text/Regex/TDFA/Text/Lazy.hs
 | |
| +++ b/Text/Regex/TDFA/Text/Lazy.hs
 | |
| @@ -38,17 +38,10 @@ import Text.Regex.TDFA.NewDFA.Uncons(Uncons(uncons))
 | |
|  import qualified Text.Regex.TDFA.NewDFA.Engine as Engine(execMatch)
 | |
|  import qualified Text.Regex.TDFA.NewDFA.Tester as Tester(matchTest)
 | |
|  
 | |
| -instance Extract L.Text where
 | |
| -  before = L.take . toEnum; after = L.drop . toEnum; empty = L.empty
 | |
| -
 | |
|  instance RegexContext Regex L.Text L.Text where
 | |
|    match = polymatch
 | |
|    matchM = polymatchM
 | |
|  
 | |
| -instance Uncons L.Text where
 | |
| -  {- INLINE uncons #-}
 | |
| -  uncons = L.uncons
 | |
| -
 | |
|  instance RegexMaker Regex CompOption ExecOption L.Text where
 | |
|    makeRegexOptsM c e source = makeRegexOptsM c e (L.unpack source)
 | |
|  
 |