diff options
Diffstat (limited to 'debug_ns.hs')
| -rw-r--r-- | debug_ns.hs | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/debug_ns.hs b/debug_ns.hs new file mode 100644 index 0000000..fbd4ea3 --- /dev/null +++ b/debug_ns.hs @@ -0,0 +1,17 @@ +{-# LANGUAGE OverloadedStrings #-} +{-# LANGUAGE NoImplicitPrelude #-} + +module Main where + +import Omni.Namespace +import Protolude +import qualified Data.Text as T + +main :: IO () +main = do + let root = "/home/ben/omni-worker-1" + let path = "/home/ben/omni-worker-1/Omni/Task.hs" + putStrLn $ "Root: " ++ root + putStrLn $ "Path: " ++ path + let res = fromPath root path + print res |
