Changing my haskell reload function to change my repl's directory to the current file's, then load the current file