I hereby claim:
- I am jliuhtonen on github.
- I am jliuhtonen (https://keybase.io/jliuhtonen) on keybase.
- I have a public key ASBc_WldAjBPWh0UVaLsxpk2MFvE59CCB5AohDrgiiBtcAo
To claim this, I am signing this object:
I hereby claim:
To claim this, I am signing this object:
module Reader where | |
type Reader ctx a = Reader (ctx -> a) | |
unit: a -> Reader any a | |
unit x = | |
Reader (\_ -> x) |
module Main where | |
import Prelude hiding (mapM_) | |
import Data.List | |
import Data.Char | |
import Data.Foldable (mapM_) | |
import qualified Data.Set as S | |
import qualified Data.Tuple as T (swap) | |
characters = "abcdefghijklmnopqrstuvwxyzåäö" |
print100' i | |
| i >= 100 = [] | |
| otherwise = (100 - i) : print100' (i + 1) | |
print100 = mapM_ (putStrLn . show) $ print100' 0 |
package my.rest.api | |
import javax.servlet.http.HttpServletResponse; | |
import javax.ws.rs.container.ContainerRequestContext; | |
import javax.ws.rs.container.ContainerResponseContext; | |
import javax.ws.rs.container.ContainerResponseFilter; | |
import java.io.IOException; | |
import java.util.Optional; | |
public class OptionalResponseFilter implements ContainerResponseFilter { |
// Example of registering javax.injection annotated classes to Jersey 2's HK2 instance ServiceLocator | |
// Uses https://code.google.com/p/reflections/ | |
public class RestApplication extends ResourceConfig { | |
@Inject | |
public RestApplication(ServiceLocator serviceLocator) { | |
packages("rest.resource"); | |
ServiceLocatorUtilities.addClasses(serviceLocator, findServiceSingletons()); | |
} |
module Main where | |
import Data.Char (toLower) | |
import Data.Tuple (swap) | |
import Data.List (foldl') | |
import qualified Data.Set as Set | |
import Control.Monad (guard) | |
import System.IO | |
type Pair = (String, String) |