diff --git a/packages/squiggle-lang/__tests__/Reducer/Reducer_MathJs/Reducer_MathJsParse_test.res b/packages/squiggle-lang/__tests__/Reducer/Reducer_MathJs/Reducer_MathJsParse_test.res
index 4e67f3d6..41ba6239 100644
--- a/packages/squiggle-lang/__tests__/Reducer/Reducer_MathJs/Reducer_MathJsParse_test.res
+++ b/packages/squiggle-lang/__tests__/Reducer/Reducer_MathJs/Reducer_MathJsParse_test.res
@@ -10,9 +10,15 @@ let expectParseToBe = (expr, answer) =>
 let testParse = (expr, answer) =>
   test(expr, () => expectParseToBe(expr, answer))
 
+let testDescParse = (desc, expr, answer) =>
+  test(desc, () => expectParseToBe(expr, answer))
+
 let skipTestParse = (expr, answer) =>
     Skip.test(expr, () => expectParseToBe(expr, answer))
 
+let skipDescTestParse = (desc, expr, answer) =>
+    Skip.test(desc, () => expectParseToBe(expr, answer))
+
 describe("MathJs parse", () => {
   describe("literals operators paranthesis", () => {
     testParse("1", "1")
@@ -43,15 +49,15 @@ describe("MathJs parse", () => {
   })
 
   describe("records", () => {
-    test("define", () => expectParseToBe("{a: 1, b: 2}", "{a: 1, b: 2}"))
-    test("use", () => expectParseToBe("record.property", "record['property']"))
+    testDescParse("define", "{a: 1, b: 2}", "{a: 1, b: 2}")
+    testDescParse("use", "record.property", "record['property']")
   })
 
   describe("comments", () => {
-    Skip.test("define", () => expectParseToBe("# This is a comment", "???"))
+    skipDescTestParse("define", "# This is a comment", "???")
   })
 
   describe("if statement", () => {
-    Skip.test("define", () => expectParseToBe("if (true) { 1 } else { 0 }", "???"))
+    skipDescTestParse("define", "if (true) { 1 } else { 0 }", "???")
   })
 })
diff --git a/packages/squiggle-lang/__tests__/Reducer/Reducer_test.res b/packages/squiggle-lang/__tests__/Reducer/Reducer_test.res
index 436c4f7c..7f6ae6f1 100644
--- a/packages/squiggle-lang/__tests__/Reducer/Reducer_test.res
+++ b/packages/squiggle-lang/__tests__/Reducer/Reducer_test.res
@@ -1,12 +1,19 @@
 open Jest
 open Reducer_TestHelpers
 
+
 let testParseToBe = (expr, answer) =>
   test(expr, () => expectParseToBe(expr, answer))
 
+let testDescParseToBe = (desc, expr, answer) =>
+  test(desc, () => expectParseToBe(expr, answer))
+
 let testEvalToBe = (expr, answer) =>
     test(expr, () => expectEvalToBe(expr, answer))
 
+let testDescEvalToBe = (desc, expr, answer) =>
+    test(desc, () => expectEvalToBe(expr, answer))
+
 describe("reducer using mathjs parse", () => {
   // Test the MathJs parser compatibility
   // Those tests toString that there is a semantic mapping from MathJs to Expression
@@ -27,21 +34,17 @@ describe("reducer using mathjs parse", () => {
     //Note. () is a empty list in Lisp
     //  The only builtin structure in Lisp is list. There are no arrays
     //  [1,2,3] becomes (1 2 3)
-    test("empty", () => expectParseToBe("[]", "Ok(())"))
+    testDescParseToBe("empty", "[]", "Ok(())")
     testParseToBe("[1, 2, 3]", "Ok((1 2 3))")
     testParseToBe("['hello', 'world']", "Ok(('hello' 'world'))")
-    test("index", () => expectParseToBe("([0,1,2])[1]", "Ok((:$atIndex (0 1 2) (1)))"))
+    testDescParseToBe("index", "([0,1,2])[1]", "Ok((:$atIndex (0 1 2) (1)))")
   })
   describe("records", () => {
-    test("define", () =>
-      expectParseToBe("{a: 1, b: 2}", "Ok((:$constructRecord (('a' 1) ('b' 2))))")
-    )
-    test("use", () =>
-      expectParseToBe(
+    testDescParseToBe("define",
+      "{a: 1, b: 2}", "Ok((:$constructRecord (('a' 1) ('b' 2))))")
+    testDescParseToBe("use",
         "{a: 1, b: 2}.a",
-        "Ok((:$atIndex (:$constructRecord (('a' 1) ('b' 2))) ('a')))",
-      )
-    )
+        "Ok((:$atIndex (:$constructRecord (('a' 1) ('b' 2))) ('a')))")
   })
 })
 
@@ -65,9 +68,8 @@ describe("eval", () => {
     testEvalToBe("[1, 2, 3]", "Ok([1, 2, 3])")
     testEvalToBe("['hello', 'world']", "Ok(['hello', 'world'])")
     testEvalToBe("([0,1,2])[1]", "Ok(1)")
-    test("index not found", () =>
-      expectEvalToBe("([0,1,2])[10]", "Error(Array index not found: 10)")
-    )
+    testDescEvalToBe("index not found",
+      "([0,1,2])[10]", "Error(Array index not found: 10)")
   })
   describe("records", () => {
     test("define", () => expectEvalToBe("{a: 1, b: 2}", "Ok({a: 1, b: 2})"))
@@ -77,11 +79,8 @@ describe("eval", () => {
 })
 
 describe("test exceptions", () => {
-  test("javascript exception", () =>
-    expectEvalToBe("jsraise('div by 0')", "Error(JS Exception: Error: 'div by 0')")
-  )
-
-  test("rescript exception", () =>
-    expectEvalToBe("resraise()", "Error(TODO: unhandled rescript exception)")
-  )
+  testDescEvalToBe("javascript exception",
+    "jsraise('div by 0')", "Error(JS Exception: Error: 'div by 0')")
+  testDescEvalToBe("rescript exception",
+    "resraise()", "Error(TODO: unhandled rescript exception)")
 })