Procházet zdrojové kódy

do not lose the : of custom @: metadata

Simon Krajewski před 12 roky
rodič
revize
0d56312e4d
1 změnil soubory, kde provedl 1 přidání a 1 odebrání
  1. 1 1
      ast.ml

+ 1 - 1
ast.ml

@@ -309,7 +309,7 @@ module Meta = struct
 		| "unifyMinDynamic" -> UnifyMinDynamic
 		| "unreflective" -> Unreflective
 		| "unsafe" -> Unsafe
-		| s -> Custom s
+		| s -> Custom (":" ^ s)
 
 	let from_string s =
 		if s = "" then Custom "" else match s.[0] with