Skip to content

Instantly share code, notes, and snippets.

@nakal
Created Jan 14, 2015
Embed
What would you like to do?
PAM authentication test in Haskell
import System.Posix.PAM
main = do
res <- authenticate "system" "user" "pass"
case res of
Left a -> putStrLn $ "error: " ++ pamCodeToMessage a
Right () -> putStrLn "success"
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment