add tests

Author: mununki

jscomp/test/record_regression.res

@@ -104,4 +104,8 @@ let setAA = (ao: option<int>) => {aa: @ns.optional ao, bb: None}
 type foo = Foo({name: string, age?: int})
 
 let foo1 = Foo({name: "foo"}) 
-let foo2 = Foo({name: "foo", age: 3})
+let foo2 = Foo({name: "foo", age: 3})
+
+// should be type error
+// let foo3 = Foo({name: "foo", age: 3, nickname: "hasNoNickname"})
+// let foo4 = Foo({name: "foo", age: "3"})