diff options
Diffstat (limited to 'cparser/Cutil.ml')
-rw-r--r-- | cparser/Cutil.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/cparser/Cutil.ml b/cparser/Cutil.ml index 6fd12323..f226d51b 100644 --- a/cparser/Cutil.ml +++ b/cparser/Cutil.ml @@ -1024,9 +1024,9 @@ let type_of_constant = function | CStr s -> let size = Int64.of_int (String.length s + 1) in TArray(TInt(IChar,[]), Some size, []) - | CWStr s -> + | CWStr(s, ik) -> let size = Int64.of_int (List.length s + 1) in - TArray(TInt(wchar_ikind(), []), Some size, []) + TArray(TInt(ik, []), Some size, []) | CEnum(_, _) -> TInt(IInt, []) (* Check that a C expression is a lvalue *) |