Add support for Windows Aarch64

Co-authored-by: Cheng Shao <[email protected]>
haskell · Jan 6, 2025 · ceaf727 · ceaf727
1 parent 79b8d13
commit ceaf727
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 1 deletion.
diff --git a/.gitignore b/.gitignore
@@ -15,3 +15,6 @@ HsDirectoryConfig.h.in
 GNUmakefile
 dist-install
 ghc.mk
+
+# IDEs
+.vscode
diff --git a/System/Directory/Internal/Windows.hsc b/System/Directory/Internal/Windows.hsc
@@ -4,7 +4,7 @@ module System.Directory.Internal.Windows where
 #if defined(mingw32_HOST_OS)
 ##if defined(i386_HOST_ARCH)
 ## define WINAPI stdcall
-##elif defined(x86_64_HOST_ARCH)
+##elif defined(x86_64_HOST_ARCH) || defined(aarch64_HOST_ARCH)
 ## define WINAPI ccall
 ##else
 ## error unknown architecture
-Original file line number
+Diff line change
@@ Expand Up / @@ -15,3 +15,6 @@ HsDirectoryConfig.h.in @@
     GNUmakefile
     dist-install
     ghc.mk
+    # IDEs
+    .vscode