import Directory ( doesFileExist )
import Monad ( when )
import IO
+import System.FilePath
\end{code}
%************************************************************************
stub_h_output_w = showSDoc stub_h_output_d
-- in
- createDirectoryHierarchy (directoryOf stub_c)
+ createDirectoryHierarchy (takeDirectory stub_c)
dumpIfSet_dyn dflags Opt_D_dump_foreign
"Foreign export header file" stub_h_output_d