aboutsummaryrefslogtreecommitdiff
path: root/backendC/CleanCompilerSources/windows_io.c
diff options
context:
space:
mode:
Diffstat (limited to 'backendC/CleanCompilerSources/windows_io.c')
-rw-r--r--backendC/CleanCompilerSources/windows_io.c4
1 files changed, 4 insertions, 0 deletions
diff --git a/backendC/CleanCompilerSources/windows_io.c b/backendC/CleanCompilerSources/windows_io.c
index 8b5014d..e6d9783 100644
--- a/backendC/CleanCompilerSources/windows_io.c
+++ b/backendC/CleanCompilerSources/windows_io.c
@@ -33,6 +33,8 @@ char *GetFileExtension (FileKind kind)
return ".icl";
case dclFile:
return ".dcl";
+ case hsFile:
+ return ".hs";
case dumpFile:
return ".dmp";
case statFile:
@@ -250,6 +252,8 @@ File FOpen (char *fname,FileKind kind,char *mode)
res=findfilepath (fname,dclFile,path);
if (!res)
res=findfilepath (fname,iclFile,path);
+ if (!res)
+ res=findfilepath (fname,hsFile,path);
if (res){
char *p,*after_last_slash;