Adapt to HsOuterTyVarBndrs

These changes accompany ghc/ghc!4107, which aims to be a fix
for #16762.

1 files changed, 138 insertions, 138 deletions

diff --git a/hypsrc-test/ref/src/Classes.html b/hypsrc-test/ref/src/Classes.html
index 3477d89d..2a44be99 100644
--- a/hypsrc-test/ref/src/Classes.html
+++ b/hypsrc-test/ref/src/Classes.html
@@ -280,12 +280,12 @@ forall a. a -> a
 </span
       ><span id="line-12"
       ></span
-      ><span id=""
       ><span class="hs-keyword"
-	>instance</span
-	><span
-	> </span
-	><span class="annot"
+      >instance</span
+      ><span
+      > </span
+      ><span id=""
+      ><span class="annot"
 	><a href="Classes.html#Foo"
 	  ><span class="hs-identifier hs-type"
 	    >Foo</span
@@ -303,93 +303,93 @@ forall a. a -&gt; a
 	  ></span
 	><span class="hs-special"
 	>]</span
-	><span
-	> </span
-	><span class="hs-keyword"
-	>where</span
-	><span
-	>
-</span
-	><span id="line-13"
 	></span
-	><span
-	>    </span
-	><span id=""
-	><span class="annot"
-	  ><span class="annottext"
-	    >bar :: [a] -&gt; Int
+      ><span
+      > </span
+      ><span class="hs-keyword"
+      >where</span
+      ><span
+      >
 </span
-	    ><a href="#"
-	    ><span class="hs-identifier hs-var hs-var hs-var hs-var"
-	      >bar</span
-	      ></a
-	    ></span
-	  ></span
-	><span
-	> </span
-	><span class="hs-glyph"
-	>=</span
-	><span
-	> </span
-	><span class="annot"
+      ><span id="line-13"
+      ></span
+      ><span
+      >    </span
+      ><span id=""
+      ><span class="annot"
 	><span class="annottext"
-	  >[a] -&gt; Int
-forall (t :: * -&gt; *) a. Foldable t =&gt; t a -&gt; Int
+	  >bar :: [a] -&gt; Int
 </span
-	  ><span class="hs-identifier hs-var"
-	  >length</span
+	  ><a href="#"
+	  ><span class="hs-identifier hs-var hs-var hs-var hs-var"
+	    >bar</span
+	    ></a
 	  ></span
-	><span
-	>
+	></span
+      ><span
+      > </span
+      ><span class="hs-glyph"
+      >=</span
+      ><span
+      > </span
+      ><span class="annot"
+      ><span class="annottext"
+	>[a] -&gt; Int
+forall (t :: * -&gt; *) a. Foldable t =&gt; t a -&gt; Int
 </span
-	><span id="line-14"
+	><span class="hs-identifier hs-var"
+	>length</span
 	></span
-	><span
-	>    </span
-	><span id=""
-	><span class="annot"
-	  ><span class="annottext"
-	    >baz :: Int -&gt; ([a], [a])
+      ><span
+      >
 </span
-	    ><a href="#"
-	    ><span class="hs-identifier hs-var hs-var hs-var hs-var"
-	      >baz</span
-	      ></a
-	    ></span
-	  ></span
-	><span
-	> </span
-	><span class="annot"
+      ><span id="line-14"
+      ></span
+      ><span
+      >    </span
+      ><span id=""
+      ><span class="annot"
 	><span class="annottext"
-	  >Int
+	  >baz :: Int -&gt; ([a], [a])
 </span
-	  ><span class="hs-identifier"
-	  >_</span
+	  ><a href="#"
+	  ><span class="hs-identifier hs-var hs-var hs-var hs-var"
+	    >baz</span
+	    ></a
 	  ></span
-	><span
-	> </span
-	><span class="hs-glyph"
-	>=</span
-	><span
-	> </span
-	><span class="hs-special"
-	>(</span
-	><span class="hs-special"
-	>[</span
-	><span class="hs-special"
-	>]</span
-	><span class="hs-special"
-	>,</span
-	><span
-	> </span
-	><span class="hs-special"
-	>[</span
-	><span class="hs-special"
-	>]</span
-	><span class="hs-special"
-	>)</span
 	></span
       ><span
+      > </span
+      ><span class="annot"
+      ><span class="annottext"
+	>Int
+</span
+	><span class="hs-identifier"
+	>_</span
+	></span
+      ><span
+      > </span
+      ><span class="hs-glyph"
+      >=</span
+      ><span
+      > </span
+      ><span class="hs-special"
+      >(</span
+      ><span class="hs-special"
+      >[</span
+      ><span class="hs-special"
+      >]</span
+      ><span class="hs-special"
+      >,</span
+      ><span
+      > </span
+      ><span class="hs-special"
+      >[</span
+      ><span class="hs-special"
+      >]</span
+      ><span class="hs-special"
+      >)</span
+      ><span
       >
 </span
       ><span id="line-15"
@@ -821,12 +821,12 @@ forall (t :: * -&gt; *) a. (Foldable t, Num a) =&gt; t a -&gt; a
 </span
       ><span id="line-27"
       ></span
-      ><span id=""
       ><span class="hs-keyword"
-	>instance</span
-	><span
-	> </span
-	><span id=""
+      >instance</span
+      ><span
+      > </span
+      ><span id=""
+      ><span id=""
 	><span class="annot"
 	  ><a href="Classes.html#Foo%27"
 	    ><span class="hs-identifier hs-type"
@@ -846,52 +846,52 @@ forall (t :: * -&gt; *) a. (Foldable t, Num a) =&gt; t a -&gt; a
 	  ><span class="hs-special"
 	  >]</span
 	  ></span
-	><span
-	> </span
-	><span class="hs-keyword"
-	>where</span
-	><span
-	>
-</span
-	><span id="line-28"
 	></span
-	><span
-	>    </span
-	><span id=""
-	><span class="annot"
-	  ><span class="annottext"
-	    >quux :: ([a], [a]) -&gt; [a]
+      ><span
+      > </span
+      ><span class="hs-keyword"
+      >where</span
+      ><span
+      >
 </span
-	    ><a href="#"
-	    ><span class="hs-identifier hs-var hs-var hs-var hs-var"
-	      >quux</span
-	      ></a
-	    ></span
-	  ></span
-	><span
-	> </span
-	><span class="hs-glyph"
-	>=</span
-	><span
-	> </span
-	><span class="annot"
+      ><span id="line-28"
+      ></span
+      ><span
+      >    </span
+      ><span id=""
+      ><span class="annot"
 	><span class="annottext"
-	  >([a] -&gt; [a] -&gt; [a]) -&gt; ([a], [a]) -&gt; [a]
-forall a b c. (a -&gt; b -&gt; c) -&gt; (a, b) -&gt; c
+	  >quux :: ([a], [a]) -&gt; [a]
 </span
-	  ><span class="hs-identifier hs-var"
-	  >uncurry</span
+	  ><a href="#"
+	  ><span class="hs-identifier hs-var hs-var hs-var hs-var"
+	    >quux</span
+	    ></a
 	  ></span
-	><span
-	> </span
-	><span class="annot"
-	><span class="annottext"
-	  >[a] -&gt; [a] -&gt; [a]
+	></span
+      ><span
+      > </span
+      ><span class="hs-glyph"
+      >=</span
+      ><span
+      > </span
+      ><span class="annot"
+      ><span class="annottext"
+	>([a] -&gt; [a] -&gt; [a]) -&gt; ([a], [a]) -&gt; [a]
+forall a b c. (a -&gt; b -&gt; c) -&gt; (a, b) -&gt; c
+</span
+	><span class="hs-identifier hs-var"
+	>uncurry</span
+	></span
+      ><span
+      > </span
+      ><span class="annot"
+      ><span class="annottext"
+	>[a] -&gt; [a] -&gt; [a]
 forall a. [a] -&gt; [a] -&gt; [a]
 </span
-	  ><span class="hs-operator hs-var"
-	  >(++)</span
-	  ></span
+	><span class="hs-operator hs-var"
+	>(++)</span
 	></span
       ><span
       >
@@ -941,23 +941,23 @@ forall a. [a] -&gt; [a] -&gt; [a]
       ></span
       ><span
       >    </span
+      ><span id="plugh"
+      ><span class="annot"
+	><a href="Classes.html#plugh"
+	  ><span class="hs-identifier hs-type"
+	    >plugh</span
+	    ></a
+	  ></span
+	></span
+      ><span
+      > </span
+      ><span class="hs-glyph"
+      >::</span
+      ><span
+      > </span
       ><span id=""
       ><span id=""
-	><span id="plugh"
-	  ><span class="annot"
-	    ><a href="Classes.html#plugh"
-	      ><span class="hs-identifier hs-type"
-		>plugh</span
-		></a
-	      ></span
-	    ></span
-	  ><span
-	  > </span
-	  ><span class="hs-glyph"
-	  >::</span
-	  ><span
-	  > </span
-	  ><span class="annot"
+	><span class="annot"
 	  ><a href="#"
 	    ><span class="hs-identifier hs-type"
 	      >p</span