Skip to content
This repository was archived by the owner on Aug 3, 2024. It is now read-only.

Commit 792b828

Browse files
committed
testsuite: Update expected output for simplified subsumption
1 parent 60c8532 commit 792b828

File tree

6 files changed

+32
-32
lines changed

6 files changed

+32
-32
lines changed

html-test/ref/Bug280.html

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -65,9 +65,9 @@
6565
><p class="src"
6666
><a id="v:x" class="def"
6767
>x</a
68-
> :: [<a href="#" title="Data.Char"
69-
>Char</a
70-
>] <a href="#" class="selflink"
68+
> :: <a href="#" title="Data.String"
69+
>String</a
70+
> <a href="#" class="selflink"
7171
>#</a
7272
></p
7373
></div

html-test/src/FunArgs.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -22,7 +22,7 @@ h :: forall a b c
2222
-> b -- ^ Second argument
2323
-> c -- ^ Third argument
2424
-> forall d. d -- ^ Result
25-
h = undefined
25+
h _ _ _ = undefined
2626

2727

2828
i :: forall a (b :: ()) d. (d ~ '())

hypsrc-test/ref/src/Classes.html

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -1109,7 +1109,7 @@
11091109
><span id=""
11101110
><span class="annot"
11111111
><span class="annottext"
1112-
>plugh :: Either a a -&gt; Either b b -&gt; Either (a -&gt; b) (b -&gt; a)
1112+
>plugh :: forall a b. Either a a -&gt; Either b b -&gt; Either (a -&gt; b) (b -&gt; a)
11131113
</span
11141114
><a href="#"
11151115
><span class="hs-identifier hs-var hs-var hs-var hs-var"

hypsrc-test/ref/src/Literals.html

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -132,7 +132,7 @@
132132
><span id="num"
133133
><span class="annot"
134134
><span class="annottext"
135-
>num :: a
135+
>num :: forall a. Num a =&gt; a
136136
</span
137137
><a href="Literals.html#num"
138138
><span class="hs-identifier hs-var hs-var"
@@ -285,7 +285,7 @@
285285
><span id="frac"
286286
><span class="annot"
287287
><span class="annottext"
288-
>frac :: a
288+
>frac :: forall a. Fractional a =&gt; a
289289
</span
290290
><a href="Literals.html#frac"
291291
><span class="hs-identifier hs-var hs-var"
@@ -360,7 +360,7 @@
360360
><span id="list"
361361
><span class="annot"
362362
><span class="annottext"
363-
>list :: [[[[a]]]]
363+
>list :: forall a. [[[[a]]]]
364364
</span
365365
><a href="Literals.html#list"
366366
><span class="hs-identifier hs-var hs-var"

hypsrc-test/ref/src/Operators.html

Lines changed: 6 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -108,7 +108,7 @@
108108
><span id="%2B%2B%2B"
109109
><span class="annot"
110110
><span class="annottext"
111-
>+++ :: [a] -&gt; [a] -&gt; [a]
111+
>+++ :: forall a. [a] -&gt; [a] -&gt; [a]
112112
</span
113113
><a href="Operators.html#%2B%2B%2B"
114114
><span class="hs-operator hs-var hs-var"
@@ -273,7 +273,7 @@
273273
><span id="%24%24%24"
274274
><span class="annot"
275275
><span class="annottext"
276-
>$$$ :: [a] -&gt; [a] -&gt; [a]
276+
>$$$ :: forall a. [a] -&gt; [a] -&gt; [a]
277277
</span
278278
><a href="Operators.html#%24%24%24"
279279
><span class="hs-operator hs-var hs-var"
@@ -406,7 +406,7 @@
406406
><span id="%2A%2A%2A"
407407
><span class="annot"
408408
><span class="annottext"
409-
>*** :: [a] -&gt; [a] -&gt; [a]
409+
>*** :: forall a. [a] -&gt; [a] -&gt; [a]
410410
</span
411411
><a href="Operators.html#%2A%2A%2A"
412412
><span class="hs-operator hs-var hs-var"
@@ -656,7 +656,7 @@
656656
><span id="%2A%2F%5C%2A"
657657
><span class="annot"
658658
><span class="annottext"
659-
>*/\* :: [[a]] -&gt; [a] -&gt; [a]
659+
>*/\* :: forall a. [[a]] -&gt; [a] -&gt; [a]
660660
</span
661661
><a href="Operators.html#%2A%2F%5C%2A"
662662
><span class="hs-operator hs-var hs-var"
@@ -828,7 +828,7 @@
828828
><span id="%2A%2A%2F%5C%2A%2A"
829829
><span class="annot"
830830
><span class="annottext"
831-
>**/\** :: [[a]] -&gt; [[a]] -&gt; [[a]]
831+
>**/\** :: forall a. [[a]] -&gt; [[a]] -&gt; [[a]]
832832
</span
833833
><a href="Operators.html#%2A%2A%2F%5C%2A%2A"
834834
><span class="hs-operator hs-var hs-var"
@@ -1065,7 +1065,7 @@
10651065
><span id="%23.%23"
10661066
><span class="annot"
10671067
><span class="annottext"
1068-
>#.# :: a -&gt; b -&gt; c -&gt; (a, b)
1068+
>#.# :: forall a b c. a -&gt; b -&gt; c -&gt; (a, b)
10691069
</span
10701070
><a href="Operators.html#%23.%23"
10711071
><span class="hs-operator hs-var hs-var"

hypsrc-test/ref/src/Polymorphism.html

Lines changed: 18 additions & 18 deletions
Original file line numberDiff line numberDiff line change
@@ -107,7 +107,7 @@
107107
><span id="foo"
108108
><span class="annot"
109109
><span class="annottext"
110-
>foo :: a -&gt; a -&gt; a
110+
>foo :: forall a. a -&gt; a -&gt; a
111111
</span
112112
><a href="Polymorphism.html#foo"
113113
><span class="hs-identifier hs-var hs-var"
@@ -205,7 +205,7 @@
205205
><span id="foo%27"
206206
><span class="annot"
207207
><span class="annottext"
208-
>foo' :: a -&gt; a -&gt; a
208+
>foo' :: forall a. a -&gt; a -&gt; a
209209
</span
210210
><a href="Polymorphism.html#foo%27"
211211
><span class="hs-identifier hs-var hs-var"
@@ -305,7 +305,7 @@
305305
><span id="bar"
306306
><span class="annot"
307307
><span class="annottext"
308-
>bar :: a -&gt; b -&gt; (a, b)
308+
>bar :: forall a b. a -&gt; b -&gt; (a, b)
309309
</span
310310
><a href="Polymorphism.html#bar"
311311
><span class="hs-identifier hs-var hs-var"
@@ -427,7 +427,7 @@
427427
><span id="bar%27"
428428
><span class="annot"
429429
><span class="annottext"
430-
>bar' :: a -&gt; b -&gt; (a, b)
430+
>bar' :: forall a b. a -&gt; b -&gt; (a, b)
431431
</span
432432
><a href="Polymorphism.html#bar%27"
433433
><span class="hs-identifier hs-var hs-var"
@@ -557,7 +557,7 @@
557557
><span id="baz"
558558
><span class="annot"
559559
><span class="annottext"
560-
>baz :: a -&gt; (a -&gt; [a -&gt; a] -&gt; b) -&gt; b
560+
>baz :: forall a b. a -&gt; (a -&gt; [a -&gt; a] -&gt; b) -&gt; b
561561
</span
562562
><a href="Polymorphism.html#baz"
563563
><span class="hs-identifier hs-var hs-var"
@@ -709,7 +709,7 @@
709709
><span id="baz%27"
710710
><span class="annot"
711711
><span class="annottext"
712-
>baz' :: a -&gt; (a -&gt; [a -&gt; a] -&gt; b) -&gt; b
712+
>baz' :: forall a b. a -&gt; (a -&gt; [a -&gt; a] -&gt; b) -&gt; b
713713
</span
714714
><a href="Polymorphism.html#baz%27"
715715
><span class="hs-identifier hs-var hs-var"
@@ -825,7 +825,7 @@
825825
><span id="quux"
826826
><span class="annot"
827827
><span class="annottext"
828-
>quux :: a -&gt; (forall a. a -&gt; a) -&gt; a
828+
>quux :: forall a. a -&gt; (forall a. a -&gt; a) -&gt; a
829829
</span
830830
><a href="Polymorphism.html#quux"
831831
><span class="hs-identifier hs-var hs-var"
@@ -994,7 +994,7 @@
994994
><span id="quux%27"
995995
><span class="annot"
996996
><span class="annottext"
997-
>quux' :: a -&gt; (forall a. a -&gt; a) -&gt; a
997+
>quux' :: forall a. a -&gt; (forall a. a -&gt; a) -&gt; a
998998
</span
999999
><a href="Polymorphism.html#quux%27"
10001000
><span class="hs-identifier hs-var hs-var"
@@ -1140,7 +1140,7 @@
11401140
><span id="num"
11411141
><span class="annot"
11421142
><span class="annottext"
1143-
>num :: a -&gt; a -&gt; a
1143+
>num :: forall a. Num a =&gt; a -&gt; a -&gt; a
11441144
</span
11451145
><a href="Polymorphism.html#num"
11461146
><span class="hs-identifier hs-var hs-var"
@@ -1256,7 +1256,7 @@
12561256
><span id="num%27"
12571257
><span class="annot"
12581258
><span class="annottext"
1259-
>num' :: a -&gt; a -&gt; a
1259+
>num' :: forall a. Num a =&gt; a -&gt; a -&gt; a
12601260
</span
12611261
><a href="Polymorphism.html#num%27"
12621262
><span class="hs-identifier hs-var hs-var"
@@ -1402,7 +1402,7 @@
14021402
><span id="eq"
14031403
><span class="annot"
14041404
><span class="annottext"
1405-
>eq :: [a] -&gt; [b] -&gt; (a, b)
1405+
>eq :: forall a b. (Eq a, Eq b) =&gt; [a] -&gt; [b] -&gt; (a, b)
14061406
</span
14071407
><a href="Polymorphism.html#eq"
14081408
><span class="hs-identifier hs-var hs-var"
@@ -1570,7 +1570,7 @@
15701570
><span id="eq%27"
15711571
><span class="annot"
15721572
><span class="annottext"
1573-
>eq' :: [a] -&gt; [b] -&gt; (a, b)
1573+
>eq' :: forall a b. (Eq a, Eq b) =&gt; [a] -&gt; [b] -&gt; (a, b)
15741574
</span
15751575
><a href="Polymorphism.html#eq%27"
15761576
><span class="hs-identifier hs-var hs-var"
@@ -1694,7 +1694,7 @@
16941694
><span id="mon"
16951695
><span class="annot"
16961696
><span class="annottext"
1697-
>mon :: (a -&gt; m a) -&gt; m a
1697+
>mon :: forall (m :: * -&gt; *) a. Monad m =&gt; (a -&gt; m a) -&gt; m a
16981698
</span
16991699
><a href="Polymorphism.html#mon"
17001700
><span class="hs-identifier hs-var hs-var"
@@ -1840,7 +1840,7 @@
18401840
><span id="mon%27"
18411841
><span class="annot"
18421842
><span class="annottext"
1843-
>mon' :: (a -&gt; m a) -&gt; m a
1843+
>mon' :: forall (m :: * -&gt; *) a. Monad m =&gt; (a -&gt; m a) -&gt; m a
18441844
</span
18451845
><a href="Polymorphism.html#mon%27"
18461846
><span class="hs-identifier hs-var hs-var"
@@ -1979,7 +1979,7 @@
19791979
><span id="norf"
19801980
><span class="annot"
19811981
><span class="annottext"
1982-
>norf :: a -&gt; (forall a. Ord a =&gt; a -&gt; a) -&gt; a
1982+
>norf :: forall a. a -&gt; (forall a. Ord a =&gt; a -&gt; a) -&gt; a
19831983
</span
19841984
><a href="Polymorphism.html#norf"
19851985
><span class="hs-identifier hs-var hs-var"
@@ -2154,7 +2154,7 @@
21542154
><span id="norf%27"
21552155
><span class="annot"
21562156
><span class="annottext"
2157-
>norf' :: a -&gt; (forall a. Ord a =&gt; a -&gt; a) -&gt; a
2157+
>norf' :: forall a. a -&gt; (forall a. Ord a =&gt; a -&gt; a) -&gt; a
21582158
</span
21592159
><a href="Polymorphism.html#norf%27"
21602160
><span class="hs-identifier hs-var hs-var"
@@ -2272,7 +2272,7 @@
22722272
><span id="plugh"
22732273
><span class="annot"
22742274
><span class="annottext"
2275-
>plugh :: a -&gt; a
2275+
>plugh :: forall a. a -&gt; a
22762276
</span
22772277
><a href="Polymorphism.html#plugh"
22782278
><span class="hs-identifier hs-var hs-var"
@@ -2436,7 +2436,7 @@
24362436
><span id="thud"
24372437
><span class="annot"
24382438
><span class="annottext"
2439-
>thud :: (a -&gt; b) -&gt; a -&gt; (a, b)
2439+
>thud :: forall a b. (a -&gt; b) -&gt; a -&gt; (a, b)
24402440
</span
24412441
><a href="Polymorphism.html#thud"
24422442
><span class="hs-identifier hs-var hs-var"

0 commit comments

Comments
 (0)