diff --git a/src/Backend/C/FromCore.hs b/src/Backend/C/FromCore.hs index 467e63ef3..a10545fee 100644 --- a/src/Backend/C/FromCore.hs +++ b/src/Backend/C/FromCore.hs @@ -1369,7 +1369,7 @@ cTypeCon c cPrimCanBeBoxed :: String -> Bool cPrimCanBeBoxed prim - = prim `elem` ["kk_char_t", "int64_t", "int16_t", "int32_t", "float", "double", "intptr_t", "kk_ssize_t"] + = prim `elem` ["kk_char_t", "int64_t", "int8_t", "int16_t", "int32_t", "float", "double", "intptr_t", "kk_ssize_t"] --------------------------------------------------------------------------------- diff --git a/test/cgen/box-int8.kk b/test/cgen/box-int8.kk new file mode 100644 index 000000000..e6362402f --- /dev/null +++ b/test/cgen/box-int8.kk @@ -0,0 +1,3 @@ +fun main() + val v = vector-init(10) fn(i) i.int8 + v[0].int.println \ No newline at end of file diff --git a/test/cgen/box-int8.kk.out b/test/cgen/box-int8.kk.out new file mode 100644 index 000000000..c22708346 --- /dev/null +++ b/test/cgen/box-int8.kk.out @@ -0,0 +1 @@ +0 \ No newline at end of file