Pārlūkot izejas kodu

[jvm] respect @:volatile

closes #10594
Simon Krajewski 3 gadi atpakaļ
vecāks
revīzija
63d33c9d09
1 mainītis faili ar 1 papildinājumiem un 0 dzēšanām
  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 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.Volatile cf.cf_meta then FdVolatile :: flags else flags in
 		let jm = jc#spawn_field cf.cf_name jsig flags in
 		let default e =
 			let p = null_pos in