Merge pull request #5292 from rescript-lang/add-a-test-case

add a test case for unboxed attribute

Author: bobzhang

jscomp/test/build.ninja

@@ -0,0 +1,12 @@
+'use strict';
+
+
+function u(param) {
+  return [
+          3,
+          u
+        ];
+}
+
+exports.u = u;
+/* No side effect */

jscomp/test/unboxed_attribute.js

@@ -0,0 +1,4 @@
+type rec func<'a, 'b, 'i> = ('i => res<'a, 'b, 'i>)
+@unboxed and res<'a, 'b, 'i> = Val(('b, func<'a, 'b, 'i>))
+
+let rec u = _ => Val(3, u)

jscomp/test/unboxed_attribute.res

@@ -1227,8 +1227,17 @@ ${mllList(ninjaCwd, [
   let depsMap = createDepsMapWithTargets(sources);
   await Promise.all(depModulesForBscAsync(sources, testDir, depsMap));
   var targets = collectTarget(sources);
-  var output = generateNinja(depsMap, targets, ninjaCwd, [stdlibTarget,pseudoTarget("$bsc")]);
-  output.push(phony(pseudoTarget('test'), fileTargets(scanFileTargets(targets,[])), ninjaCwd));
+  var output = generateNinja(depsMap, targets, ninjaCwd, [
+    stdlibTarget,
+    pseudoTarget("$bsc"),
+  ]);
+  output.push(
+    phony(
+      pseudoTarget("test"),
+      fileTargets(scanFileTargets(targets, [])),
+      ninjaCwd
+    )
+  );
   writeFileAscii(
     path.join(testDir, ninjaOutput),
     templateTestRules + output.join("\n") + "\n"