We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent c50aeb9 commit ae4c208Copy full SHA for ae4c208
lib/fulminate/cn_to_ail.ml
@@ -2158,7 +2158,22 @@ let generate_datatype_equality_function (filename : string) (cn_datatype : _ cn_
2158
0,
2159
empty_attributes,
2160
param_syms,
2161
- mk_stmt A.(AilSblock ([], [ mk_stmt tag_if_stmt ])) ) )
+ mk_stmt
2162
+ A.(
2163
+ AilSblock
2164
+ ( [],
2165
+ [ mk_stmt tag_if_stmt;
2166
2167
+ (AilSreturn
2168
+ (mk_expr (* AilEconst ConstantNull *)
2169
+ (AilEcast
2170
+ ( C.no_qualifiers,
2171
+ C.mk_ctype_pointer C.no_qualifiers C.void,
2172
+ mk_expr
2173
+ (AilEconst
2174
+ (ConstantInteger (IConstant (Z.zero, Decimal, None))))
2175
+ ))))
2176
+ ] )) ) )
2177
in
2178
[ (decl, def) ]
2179
0 commit comments