|
@@ -917,7 +917,7 @@ module TypeBinding = struct
|
|
e
|
|
e
|
|
end in
|
|
end in
|
|
e
|
|
e
|
|
- | Var v when v.v_read = AccInline ->
|
|
|
|
|
|
+ | Var v when v.v_read = AccInline && ctx.g.doinline ->
|
|
let e = require_constant_expression e "Inline variable initialization must be a constant value" in
|
|
let e = require_constant_expression e "Inline variable initialization must be a constant value" in
|
|
begin match c.cl_kind with
|
|
begin match c.cl_kind with
|
|
| KAbstractImpl a when has_class_field_flag cf CfEnum && a.a_enum ->
|
|
| KAbstractImpl a when has_class_field_flag cf CfEnum && a.a_enum ->
|