summaryrefslogtreecommitdiff
path: root/m4/ghc_convert_platform_parts.m4
diff options
context:
space:
mode:
Diffstat (limited to 'm4/ghc_convert_platform_parts.m4')
-rw-r--r--m4/ghc_convert_platform_parts.m49
1 files changed, 9 insertions, 0 deletions
diff --git a/m4/ghc_convert_platform_parts.m4 b/m4/ghc_convert_platform_parts.m4
new file mode 100644
index 0000000000..940326fe3b
--- /dev/null
+++ b/m4/ghc_convert_platform_parts.m4
@@ -0,0 +1,9 @@
+# GHC_CONVERT_PLATFORM_PARTS(input_platform, OutputPlatform)
+# --------------------------------
+# Call all 3 of the underlying `GHC_CONVERT_*` functions to convert the
+# parsed platform from GNU to GHC naming.
+AC_DEFUN([GHC_CONVERT_PLATFORM_PARTS],[
+ GHC_CONVERT_CPU([$]$1[_cpu], $2[Arch])
+ GHC_CONVERT_VENDOR([$]$1[_vendor], $2[Vendor])
+ GHC_CONVERT_OS([$]$1[_os], [$]$2[Arch], $2[OS])
+])