diff options
Diffstat (limited to 'src/types.c')
| -rw-r--r-- | src/types.c | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/types.c b/src/types.c index a4dcc5e5..b0caca1a 100644 --- a/src/types.c +++ b/src/types.c @@ -8,7 +8,6 @@ #include "environment.h" #include "stdlib/integers.h" -#include "stdlib/print.h" #include "stdlib/text.h" #include "stdlib/util.h" #include "types.h" @@ -30,7 +29,7 @@ Text_t type_to_text(type_t *t) { case CStringType: return Text("CString"); case TextType: return Match(t, TextType)->lang ? Text$from_str(Match(t, TextType)->lang) : Text("Text"); case BigIntType: return Text("Int"); - case IntType: return Texts("Int", String(Match(t, IntType)->bits)); + case IntType: return Texts("Int", (int32_t)Match(t, IntType)->bits); case NumType: return Match(t, NumType)->bits == TYPE_NBITS32 ? Text("Num32") : Text("Num"); case ListType: { DeclareMatch(list, t, ListType); @@ -84,7 +83,7 @@ Text_t type_to_text(type_t *t) { } default: { raise(SIGABRT); - return Texts("Unknown type: ", String(t->tag)); + return Texts("Unknown type: ", (int32_t)t->tag); } } } |