Browse Source

[jvm] respect @:volatile

closes #10594
Simon Krajewski 3 years ago
parent
commit
63d33c9d09
1 changed files with 1 additions and 0 deletions
  1. 1 0
      src/generators/genjvm.ml

+ 1 - 0
src/generators/genjvm.ml

@@ -2462,6 +2462,7 @@ class tclass_to_jvm gctx c = object(self)
 		let flags = if Meta.has Meta.Private cf.cf_meta then [FdPrivate] else if Meta.has Meta.Protected cf.cf_meta then [FdProtected] else [FdPublic] in
 		let flags = if Meta.has Meta.Private cf.cf_meta then [FdPrivate] else if Meta.has Meta.Protected cf.cf_meta then [FdProtected] else [FdPublic] in
 		let flags = if mtype = MStatic then FdStatic :: flags else flags in
 		let flags = if mtype = MStatic then FdStatic :: flags else flags in
 		let flags = if Meta.has Meta.JvmSynthetic cf.cf_meta then FdSynthetic :: flags else flags in
 		let flags = if Meta.has Meta.JvmSynthetic cf.cf_meta then FdSynthetic :: flags else flags in
+		let flags = if Meta.has Meta.Volatile cf.cf_meta then FdVolatile :: flags else flags in
 		let jm = jc#spawn_field cf.cf_name jsig flags in
 		let jm = jc#spawn_field cf.cf_name jsig flags in
 		let default e =
 		let default e =
 			let p = null_pos in
 			let p = null_pos in