소스 검색

do not lose the : of custom @: metadata

Simon Krajewski 12 년 전
부모
커밋
0d56312e4d
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  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