arch stuff

1 files changed, 14 insertions, 0 deletions

diff --git a/src/targ.cff b/src/targ.cff
index c5fc093..f0b500b 100644
--- a/src/targ.cff
+++ b/src/targ.cff
@@ -31,3 +31,17 @@ extern fn targ_ini(name *const u8) bool {
    }
    return #f;
 }
+
+extern fn triple2targ(triple *const u8) *const u8 {
+   let arch = (do
+      let delim = strstr(triple, "-");
+      delim ? triple[0::delim - triple] : spanz(triple);
+   );
+   let rest = arch.#ptr + arch.#len;
+   defmacro archp(s) [ (strncmp(s, arch.#ptr, arch.#len) == 0) ]
+   defmacro restp(s) [ (strstr(rest, s) != #null) ]
+   switch {
+   case archp("x86_64") and !restp("windows"); return "amd64-sysv";
+   }
+   return #null;
+}