Paste number 96685: but how do you make it go?

Paste number 96685: but how do you make it go?
Pasted by: olognation
When:1 year, 10 months ago
Share:Tweet this! | http://paste.lisp.org/+22LP
Channel:None
Paste contents:
Raw Source | XML | Display As
-- Some snipped code to chdir. 

import System.Directory
import System.FilePath

main = do 
  let fp = ("/home/ralph")::FilePath
  setCurrentDirectory fp
  d <-  getCurrentDirectory
  putStrLn $ show $ splitExtension d

This paste has no annotations.

Colorize as:
Show Line Numbers

Lisppaste pastes can be made by anyone at any time. Imagine a fearsomely comprehensive disclaimer of liability. Now fear, comprehensively.