Main.hs

module Main
  ( main
  ) where

import Prelude hiding
  ( putStrLn
  )

import Data.Text.IO
  ( putStrLn
  )

import PaymentServer.Ristretto
  ( randomSigningKey
  )

main :: IO ()
main = randomSigningKey >>= putStrLn