diff --git a/tests/oprint/expected/oprint.resi.txt b/tests/oprint/expected/oprint.resi.txt
index 8e951fa7..29fbcffa 100644
--- a/tests/oprint/expected/oprint.resi.txt
+++ b/tests/oprint/expected/oprint.resi.txt
@@ -493,4 +493,5 @@ and ASet: {
 }
 type emptyObject = {.}
 let f: (~x: 'a=?, ~y: 'b) => option<'a>
-type call = CleanStart
\ No newline at end of file
+type call = CleanStart
+let f: (~a: int=?) => int
\ No newline at end of file
diff --git a/tests/oprint/oprint.res b/tests/oprint/oprint.res
index c40acb0e..f135c8a4 100644
--- a/tests/oprint/oprint.res
+++ b/tests/oprint/oprint.res
@@ -338,3 +338,5 @@ type emptyObject = {.}
 let f = (~x=?, ~y as _) => x
 
 type call = CleanStart
+
+let f = (~a=1) => 1