Allow function types in records without parentheses

CHANGES.md

@@ -11,6 +11,9 @@
 
 ## Bug fixes
 
+* Function types in records no longer require gratuitous parentheses.
+(#1994)
+
 * Unexpected special-case type behavior of monad binds in the
   syntactic top level has been removed.
   (This was _not_ specifically associated with the TopLevel monad, so

intTests/test1994/test.saw

@@ -0,0 +1 @@
+let thing : { fn: Int -> Int } = { fn = \x -> x };

intTests/test1994/test.sh

@@ -0,0 +1,3 @@
+set -e
+
+$SAW test.saw

src/SAWScript/Parser.y

@@ -214,7 +214,7 @@ Type :: { Type }
  | BaseType '->' Type                   { tFun (maxSpan [$1, $3]) $1 $3 }
 
 FieldType :: { (Name, Type) }
-  : name ':' BaseType                   { (tokStr $1, $3)         }
+  : name ':' Type                       { (tokStr $1, $3)         }
 
 BaseType :: { Type }
  : name                                 { tVar (getPos $1) (tokStr $1)  }