{-# LANGUAGE NoImplicitPrelude #-} module Debug.Trace where import Prelude import FFI trace :: String -> Ptr a -> Ptr a trace :: String -> Ptr a -> Ptr a trace = String -> String -> Ptr a -> Ptr a forall s a. IsString s => s -> a ffi String "console.log(%1),%2" traceShow :: Automatic a -> Ptr b -> Ptr b traceShow :: Automatic a -> Ptr b -> Ptr b traceShow = String -> Automatic a -> Ptr b -> Ptr b forall s a. IsString s => s -> a ffi String "console.log(%1),%2"