diff --git a/src/core/ffi.c b/src/core/ffi.c
index bdccbfc7..da3e7ffb 100644
--- a/src/core/ffi.c
+++ b/src/core/ffi.c
@@ -227,6 +227,8 @@ static JanetFFIPrimType decode_ffi_prim(const uint8_t *name) {
     if (!janet_cstrcmp(name, "ssize")) return JANET_FFI_TYPE_INT32;
 #endif
     /* aliases */
+    if (!janet_cstrcmp(name, "r32")) return JANET_FFI_TYPE_FLOAT;
+    if (!janet_cstrcmp(name, "r64")) return JANET_FFI_TYPE_DOUBLE;
     if (!janet_cstrcmp(name, "s8")) return JANET_FFI_TYPE_INT8;
     if (!janet_cstrcmp(name, "u8")) return JANET_FFI_TYPE_UINT8;
     if (!janet_cstrcmp(name, "s16")) return JANET_FFI_TYPE_INT16;
diff --git a/tools/tm_lang_gen.janet b/tools/tm_lang_gen.janet
index 9c0f6161..29c6292d 100644
--- a/tools/tm_lang_gen.janet
+++ b/tools/tm_lang_gen.janet
@@ -17,6 +17,7 @@
       "quote"
       "quasiquote"
       "unquote"
+      "upscope"
       "splice"]
     (all-bindings)))
 (def allsyms (dyn :allsyms))