mirror of
https://github.com/idris-lang/Idris2.git
synced 2024-11-13 05:48:39 +03:00
Updated tests
This commit is contained in:
parent
7b903be9ed
commit
778d930f95
@ -20,8 +20,8 @@ Can't match on Nat (Erased argument) at
|
||||
5 strangeId {a=Nat} x = x+1
|
||||
^^^
|
||||
|
||||
TypeCase2.idr:9:5--9:9:While processing left hand side of foo at TypeCase2.idr:9:1--10:1:
|
||||
TypeCase2.idr:9:5--9:8:While processing left hand side of foo at TypeCase2.idr:9:1--10:1:
|
||||
Can't match on Nat (Erased argument) at
|
||||
9 foo Nat = "Nat"
|
||||
^^^^
|
||||
^^^
|
||||
|
||||
|
@ -1,26 +1,26 @@
|
||||
000018(:protocol-version 2 0)
|
||||
000038(:write-string "1/1: Building LocType (LocType.idr)" 1)
|
||||
0000ca(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 23) (:end 7 25)) ((:name "x") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "a")))))) 1)
|
||||
0000d8(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 38) (:end 8 1)) ((:name "ys") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect m a)")))))) 1)
|
||||
0000df(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 35) (:end 7 38)) ((:name "xs") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect {k:260} a)")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 9) (:end 7 11)) ((:name "x") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "?{_:261}_[]")))))) 1)
|
||||
0000ca(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 23) (:end 7 24)) ((:name "x") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "a")))))) 1)
|
||||
0000d9(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 38) (:end 7 40)) ((:name "ys") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect m a)")))))) 1)
|
||||
0000df(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 35) (:end 7 37)) ((:name "xs") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect {k:260} a)")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 9) (:end 7 10)) ((:name "x") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "?{_:261}_[]")))))) 1)
|
||||
0000ed(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 14) (:end 7 16)) ((:name "xs") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect ?{k:260}_[] ?{_:261}_[])")))))) 1)
|
||||
0000ed(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 18) (:end 7 21)) ((:name "ys") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect ?{_:262}_[] ?{_:261}_[])")))))) 1)
|
||||
0000d8(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 6 16) (:end 7 1)) ((:name "ys") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect m a)")))))) 1)
|
||||
0000ed(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 6 11) (:end 6 14)) ((:name "ys") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect ?{_:251}_[] ?{_:250}_[])")))))) 1)
|
||||
0001ca(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 1) (:end 6 1)) ((:name "Main.append") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "{0 m : Prelude.Nat} -> {0 a : Type} -> {0 n : Prelude.Nat} -> (({arg:241} : (Main.Vect n[0] a[1])) -> (({arg:242} : (Main.Vect m[3] a[2])) -> (Main.Vect (Prelude.+ Prelude.Nat Prelude.Num implementation at Prelude.idr:849:1--856:1 n[2] m[4]) a[3])))")))))) 1)
|
||||
0000cb(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 47) (:end 6 1)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000ed(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 18) (:end 7 20)) ((:name "ys") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect ?{_:262}_[] ?{_:261}_[])")))))) 1)
|
||||
0000d9(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 6 16) (:end 6 18)) ((:name "ys") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect m a)")))))) 1)
|
||||
0000ed(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 6 11) (:end 6 13)) ((:name "ys") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect ?{_:251}_[] ?{_:250}_[])")))))) 1)
|
||||
0001cb(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 1) (:end 5 48)) ((:name "Main.append") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "{0 m : Prelude.Nat} -> {0 a : Type} -> {0 n : Prelude.Nat} -> (({arg:241} : (Main.Vect n[0] a[1])) -> (({arg:242} : (Main.Vect m[3] a[2])) -> (Main.Vect (Prelude.+ Prelude.Nat Prelude.Num implementation at Prelude.idr:849:1--856:1 n[2] m[4]) a[3])))")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 47) (:end 5 48)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 44) (:end 5 45)) ((:name "m") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Prelude.Nat")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 40) (:end 5 42)) ((:name "n") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Prelude.Nat")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 29) (:end 5 31)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 27) (:end 5 29)) ((:name "m") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Prelude.Nat")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 17) (:end 5 19)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 15) (:end 5 17)) ((:name "n") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Prelude.Nat")))))) 1)
|
||||
0000cb(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 3 41) (:end 5 1)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 40) (:end 5 41)) ((:name "n") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Prelude.Nat")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 29) (:end 5 30)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 27) (:end 5 28)) ((:name "m") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Prelude.Nat")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 17) (:end 5 18)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 15) (:end 5 16)) ((:name "n") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Prelude.Nat")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 3 41) (:end 3 42)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 3 38) (:end 3 39)) ((:name "k") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Prelude.Nat")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 3 25) (:end 3 27)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 3 23) (:end 3 25)) ((:name "k") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Prelude.Nat")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 3 13) (:end 3 15)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000cb(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 2 19) (:end 3 6)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 3 25) (:end 3 26)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 3 23) (:end 3 24)) ((:name "k") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Prelude.Nat")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 3 13) (:end 3 14)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 2 19) (:end 2 20)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
000015(:return (:ok ()) 1)
|
||||
Alas the file is done, aborting
|
||||
|
@ -1,27 +1,27 @@
|
||||
000018(:protocol-version 2 0)
|
||||
000038(:write-string "1/1: Building LocType (LocType.idr)" 1)
|
||||
0000ca(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 23) (:end 7 25)) ((:name "x") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "a")))))) 1)
|
||||
0000d8(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 38) (:end 8 1)) ((:name "ys") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect m a)")))))) 1)
|
||||
0000df(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 35) (:end 7 38)) ((:name "xs") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect {k:260} a)")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 9) (:end 7 11)) ((:name "x") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "?{_:261}_[]")))))) 1)
|
||||
0000ca(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 23) (:end 7 24)) ((:name "x") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "a")))))) 1)
|
||||
0000d9(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 38) (:end 7 40)) ((:name "ys") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect m a)")))))) 1)
|
||||
0000df(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 35) (:end 7 37)) ((:name "xs") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect {k:260} a)")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 9) (:end 7 10)) ((:name "x") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "?{_:261}_[]")))))) 1)
|
||||
0000ed(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 14) (:end 7 16)) ((:name "xs") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect ?{k:260}_[] ?{_:261}_[])")))))) 1)
|
||||
0000ed(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 18) (:end 7 21)) ((:name "ys") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect ?{_:262}_[] ?{_:261}_[])")))))) 1)
|
||||
0000d8(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 6 16) (:end 7 1)) ((:name "ys") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect m a)")))))) 1)
|
||||
0000ed(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 6 11) (:end 6 14)) ((:name "ys") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect ?{_:251}_[] ?{_:250}_[])")))))) 1)
|
||||
0001ca(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 1) (:end 6 1)) ((:name "Main.append") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "{0 m : Prelude.Nat} -> {0 a : Type} -> {0 n : Prelude.Nat} -> (({arg:241} : (Main.Vect n[0] a[1])) -> (({arg:242} : (Main.Vect m[3] a[2])) -> (Main.Vect (Prelude.+ Prelude.Nat Prelude.Num implementation at Prelude.idr:849:1--856:1 n[2] m[4]) a[3])))")))))) 1)
|
||||
0000cb(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 47) (:end 6 1)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000ed(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 7 18) (:end 7 20)) ((:name "ys") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect ?{_:262}_[] ?{_:261}_[])")))))) 1)
|
||||
0000d9(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 6 16) (:end 6 18)) ((:name "ys") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect m a)")))))) 1)
|
||||
0000ed(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 6 11) (:end 6 13)) ((:name "ys") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "(Main.Vect ?{_:251}_[] ?{_:250}_[])")))))) 1)
|
||||
0001cb(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 1) (:end 5 48)) ((:name "Main.append") (:namespace "") (:decor :bound) (:implicit :False) (:key "") (:doc-overview "") (:type "{0 m : Prelude.Nat} -> {0 a : Type} -> {0 n : Prelude.Nat} -> (({arg:241} : (Main.Vect n[0] a[1])) -> (({arg:242} : (Main.Vect m[3] a[2])) -> (Main.Vect (Prelude.+ Prelude.Nat Prelude.Num implementation at Prelude.idr:849:1--856:1 n[2] m[4]) a[3])))")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 47) (:end 5 48)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 44) (:end 5 45)) ((:name "m") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Prelude.Nat")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 40) (:end 5 42)) ((:name "n") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Prelude.Nat")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 29) (:end 5 31)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 27) (:end 5 29)) ((:name "m") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Prelude.Nat")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 17) (:end 5 19)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 15) (:end 5 17)) ((:name "n") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Prelude.Nat")))))) 1)
|
||||
0000cb(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 3 41) (:end 5 1)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 40) (:end 5 41)) ((:name "n") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Prelude.Nat")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 29) (:end 5 30)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 27) (:end 5 28)) ((:name "m") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Prelude.Nat")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 17) (:end 5 18)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 5 15) (:end 5 16)) ((:name "n") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Prelude.Nat")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 3 41) (:end 3 42)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 3 38) (:end 3 39)) ((:name "k") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Prelude.Nat")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 3 25) (:end 3 27)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 3 23) (:end 3 25)) ((:name "k") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Prelude.Nat")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 3 13) (:end 3 15)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000cb(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 2 19) (:end 3 6)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 3 25) (:end 3 26)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000d3(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 3 23) (:end 3 24)) ((:name "k") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Prelude.Nat")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 3 13) (:end 3 14)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
0000cc(:output (:ok (:highlight-source ((((:filename "LocType.idr") (:start 2 19) (:end 2 20)) ((:name "a") (:namespace "") (:decor :type) (:implicit :False) (:key "") (:doc-overview "") (:type "Type")))))) 1)
|
||||
000015(:return (:ok ()) 1)
|
||||
000037(:return (:ok "Main.Vect : Nat -> Type -> Type" ()) 2)
|
||||
Alas the file is done, aborting
|
||||
|
@ -1,10 +1,10 @@
|
||||
1/1: Building Ambig1 (Ambig1.idr)
|
||||
Main> Bye for now!
|
||||
1/1: Building Ambig2 (Ambig2.idr)
|
||||
Ambig2.idr:26:21--26:28:While processing right hand side of keepUnique at Ambig2.idr:26:1--28:1:
|
||||
Ambig2.idr:26:21--26:27:While processing right hand side of keepUnique at Ambig2.idr:26:1--28:1:
|
||||
Ambiguous elaboration at:
|
||||
26 keepUnique {b} xs = toList (fromList xs)
|
||||
^^^^^^^
|
||||
^^^^^^
|
||||
Possible correct results:
|
||||
Main.Set.toList ?arg
|
||||
Main.Vect.toList ?arg
|
||||
|
@ -1,5 +1,5 @@
|
||||
1/1: Building NoInfer (NoInfer.idr)
|
||||
NoInfer.idr:1:7--1:9:Unsolved holes:
|
||||
Main.{_:1} introduced at NoInfer.idr:1:7--1:9
|
||||
NoInfer.idr:1:7--1:8:Unsolved holes:
|
||||
Main.{_:1} introduced at NoInfer.idr:1:7--1:8
|
||||
|
||||
Main> Bye for now!
|
||||
|
@ -1,9 +1,9 @@
|
||||
1/1: Building Dots1 (Dots1.idr)
|
||||
1/1: Building Dots2 (Dots2.idr)
|
||||
Dots2.idr:2:7--2:9:While processing left hand side of foo at Dots2.idr:2:1--4:1:
|
||||
Dots2.idr:2:7--2:8:While processing left hand side of foo at Dots2.idr:2:1--4:1:
|
||||
Can't match on ?x [no locals in scope] (Non linear pattern variable) at
|
||||
2 foo x x = x + x
|
||||
^^
|
||||
^
|
||||
|
||||
1/1: Building Dots3 (Dots3.idr)
|
||||
Dots3.idr:5:29--5:30:While processing left hand side of addBaz at Dots3.idr:5:1--6:1:
|
||||
|
@ -1,11 +1,11 @@
|
||||
1/1: Building Rewrite (Rewrite.idr)
|
||||
Rewrite.idr:15:25--17:1:While processing right hand side of wrongCommutes at Rewrite.idr:15:1--17:1:
|
||||
Rewrite.idr:15:25--15:57:While processing right hand side of wrongCommutes at Rewrite.idr:15:1--17:1:
|
||||
Rewriting by m + k = k + m did not change type S k + m = m + S k at:
|
||||
15 wrongCommutes (S k) m = rewrite plusCommutes m k in ?bar
|
||||
16
|
||||
17 wrongCommutes2 : (n, m : Nat) -> n + m = m + n
|
||||
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
|
||||
|
||||
Rewrite.idr:19:26--20:1:While processing right hand side of wrongCommutes2 at Rewrite.idr:19:1--20:1:
|
||||
Rewrite.idr:19:26--19:43:While processing right hand side of wrongCommutes2 at Rewrite.idr:19:1--20:1:
|
||||
Nat is not a rewrite rule type at:
|
||||
19 wrongCommutes2 (S k) m = rewrite m in ?bar
|
||||
^^^^^^^^^^^^^^^^^
|
||||
|
||||
|
@ -1,5 +1,5 @@
|
||||
1/1: Building Eta (Eta.idr)
|
||||
Eta.idr:14:10--15:1:While processing right hand side of etaBad at Eta.idr:14:1--15:1:
|
||||
Eta.idr:14:10--14:14:While processing right hand side of etaBad at Eta.idr:14:1--15:1:
|
||||
When unifying \x => (\y => (MkTest ?_ ?_)) = \x => (\y => (MkTest ?_ ?_)) and MkTest = \x => (\y => (MkTest ?_ ?_))
|
||||
Mismatch between:
|
||||
Nat
|
||||
@ -7,9 +7,10 @@ and
|
||||
Integer
|
||||
at:
|
||||
14 etaBad = Refl
|
||||
^^^^
|
||||
|
||||
1/1: Building Eta2 (Eta2.idr)
|
||||
Eta2.idr:2:8--4:1:While processing right hand side of test at Eta2.idr:2:1--4:1:
|
||||
Eta2.idr:2:8--2:12:While processing right hand side of test at Eta2.idr:2:1--4:1:
|
||||
When unifying \x => (S ?_) = \x => (S ?_) and S = \x => (S ?_)
|
||||
Mismatch between:
|
||||
a
|
||||
@ -17,10 +18,9 @@ and
|
||||
Nat
|
||||
at:
|
||||
2 test = Refl
|
||||
3
|
||||
4 test2 : ?
|
||||
^^^^
|
||||
|
||||
Eta2.idr:5:44--6:1:While processing right hand side of test2 at Eta2.idr:5:1--6:1:
|
||||
Eta2.idr:5:44--5:48:While processing right hand side of test2 at Eta2.idr:5:1--6:1:
|
||||
When unifying \x => (S ?_) = \x => (S ?_) and S = \x => (S ?_)
|
||||
Mismatch between:
|
||||
a
|
||||
@ -28,4 +28,5 @@ and
|
||||
Nat
|
||||
at:
|
||||
5 test2 = {a : _} -> the (S = \x : a => S _) Refl
|
||||
^^^^
|
||||
|
||||
|
@ -1,6 +1,6 @@
|
||||
1/1: Building Fin (Fin.idr)
|
||||
Fin.idr:34:7--36:1:While processing right hand side of bar at Fin.idr:34:1--36:1:
|
||||
Fin.idr:34:7--34:8:While processing right hand side of bar at Fin.idr:34:1--36:1:
|
||||
Can't find an implementation for IsJust (integerToFin 8 5) at:
|
||||
34 bar = 8
|
||||
35
|
||||
^
|
||||
|
||||
|
@ -1,13 +1,13 @@
|
||||
1/1: Building Erase (Erase.idr)
|
||||
Erase.idr:5:5--5:11:While processing left hand side of bad at Erase.idr:5:1--6:1:
|
||||
Erase.idr:5:5--5:10:While processing left hand side of bad at Erase.idr:5:1--6:1:
|
||||
Can't match on False (Erased argument) at
|
||||
5 bad False = True
|
||||
^^^^^^
|
||||
^^^^^
|
||||
|
||||
Erase.idr:19:18--19:22:While processing left hand side of minusBad at Erase.idr:19:1--20:1:
|
||||
Erase.idr:19:18--19:21:While processing left hand side of minusBad at Erase.idr:19:1--20:1:
|
||||
Can't match on LeZ (Erased argument) at
|
||||
19 minusBad (S k) Z LeZ = S k
|
||||
^^^^
|
||||
^^^
|
||||
|
||||
Main> \m => minus (S (S m)) m prf
|
||||
Main> Bye for now!
|
||||
|
@ -1,5 +1,5 @@
|
||||
1/1: Building arity (arity.idr)
|
||||
arity.idr:4:16--4:22:While processing right hand side of foo at arity.idr:4:1--7:1:
|
||||
arity.idr:4:16--4:21:While processing right hand side of foo at arity.idr:4:1--7:1:
|
||||
When unifying (1 _ : Nat) -> MyN and MyN
|
||||
Mismatch between:
|
||||
(1 _ : Nat) -> MyN
|
||||
@ -7,5 +7,5 @@ and
|
||||
MyN
|
||||
at:
|
||||
4 foo x y = case MkN x of
|
||||
^^^^^^
|
||||
^^^^^
|
||||
|
||||
|
@ -1,11 +1,11 @@
|
||||
1/1: Building unboundimps (unboundimps.idr)
|
||||
unboundimps.idr:18:11--18:14:While processing type of len' at unboundimps.idr:18:1--19:1:
|
||||
unboundimps.idr:18:11--18:13:While processing type of len' at unboundimps.idr:18:1--18:20:
|
||||
Undefined name xs at:
|
||||
18 len': Env xs -> Nat
|
||||
^^^
|
||||
^^
|
||||
|
||||
unboundimps.idr:19:16--19:18:While processing type of append' at unboundimps.idr:19:1--21:1:
|
||||
unboundimps.idr:19:16--19:17:While processing type of append' at unboundimps.idr:19:1--19:49:
|
||||
Undefined name n at:
|
||||
19 append' : Vect n a -> Vect m a -> Vect (n + m) a
|
||||
^^
|
||||
^
|
||||
|
||||
|
@ -1,5 +1,5 @@
|
||||
1/1: Building lets (lets.idr)
|
||||
lets.idr:22:39--23:14:While processing right hand side of dolet2 at lets.idr:21:1--26:1:
|
||||
lets.idr:22:39--22:40:While processing right hand side of dolet2 at lets.idr:21:1--26:1:
|
||||
When unifying Maybe Int and Maybe String
|
||||
Mismatch between:
|
||||
Int
|
||||
@ -7,5 +7,5 @@ and
|
||||
String
|
||||
at:
|
||||
22 = do let Just x' : Maybe String = x
|
||||
23 | Nothing => Nothing
|
||||
^
|
||||
|
||||
|
@ -1,8 +1,8 @@
|
||||
1/1: Building Cover (Cover.idr)
|
||||
Cover.idr:16:1--16:8:While processing left hand side of badBar at Cover.idr:16:1--17:1:
|
||||
Cover.idr:16:1--16:7:While processing left hand side of badBar at Cover.idr:16:1--17:1:
|
||||
Can't match on 0 as it has a polymorphic type at:
|
||||
16 badBar Z = Z
|
||||
^^^^^^^
|
||||
^^^^^^
|
||||
|
||||
Main> Main.foo:
|
||||
foo (0, S _)
|
||||
|
@ -1,8 +1,8 @@
|
||||
1/1: Building Cover (Cover.idr)
|
||||
Cover.idr:14:1--14:5:While processing left hand side of bad at Cover.idr:14:1--15:1:
|
||||
Cover.idr:14:1--14:4:While processing left hand side of bad at Cover.idr:14:1--15:1:
|
||||
Can't match on Just (fromInteger 0) as it has a polymorphic type at:
|
||||
14 bad (Just 0) _ = False
|
||||
^^^^
|
||||
^^^
|
||||
|
||||
Main> Main.okay:
|
||||
okay (S _) IsNat
|
||||
|
@ -1,9 +1,9 @@
|
||||
1/1: Building eq (eq.idr)
|
||||
eq.idr:27:1--29:1:badeq x y p is not a valid impossible case at:
|
||||
eq.idr:27:1--27:23:badeq x y p is not a valid impossible case at:
|
||||
27 badeq x y p impossible
|
||||
28
|
||||
29 badeqL : (xs : List a) -> (ys : List a) -> (x :: xs = x :: y :: ys) -> Nat
|
||||
^^^^^^^^^^^^^^^^^^^^^^
|
||||
|
||||
eq.idr:30:1--31:1:badeqL xs ys p is not a valid impossible case at:
|
||||
eq.idr:30:1--30:26:badeqL xs ys p is not a valid impossible case at:
|
||||
30 badeqL xs ys p impossible
|
||||
^^^^^^^^^^^^^^^^^^^^^^^^^
|
||||
|
||||
|
@ -1,3 +1,3 @@
|
||||
1/1: Building unreachable (unreachable.idr)
|
||||
unreachable.idr:3:1--3:18:Warning: unreachable clause: foo Nothing True
|
||||
unreachable.idr:5:1--5:19:Warning: unreachable clause: foo Nothing False
|
||||
unreachable.idr:3:1--3:17:Warning: unreachable clause: foo Nothing True
|
||||
unreachable.idr:5:1--5:18:Warning: unreachable clause: foo Nothing False
|
||||
|
@ -1,5 +1,5 @@
|
||||
1/1: Building Error (Error.idr)
|
||||
Error.idr:6:19--7:1:While processing right hand side of wrong at Error.idr:6:1--7:1:
|
||||
Error.idr:6:19--6:20:While processing right hand side of wrong at Error.idr:6:1--7:1:
|
||||
When unifying a and Vect ?k ?a
|
||||
Mismatch between:
|
||||
a
|
||||
@ -7,4 +7,5 @@ and
|
||||
Vect ?k ?a
|
||||
at:
|
||||
6 wrong x xs = x :: x
|
||||
^
|
||||
|
||||
|
@ -1,5 +1,6 @@
|
||||
1/1: Building Error (Error.idr)
|
||||
Error.idr:6:17--7:1:While processing right hand side of wrong at Error.idr:6:1--7:1:
|
||||
Error.idr:6:17--6:19:While processing right hand side of wrong at Error.idr:6:1--7:1:
|
||||
Undefined name ys at:
|
||||
6 wrong xs = x :: ys
|
||||
^^
|
||||
|
||||
|
@ -1,5 +1,5 @@
|
||||
1/1: Building Error (Error.idr)
|
||||
Error.idr:12:18--13:1:While processing right hand side of wrong at Error.idr:12:1--13:1:
|
||||
Error.idr:12:18--12:19:While processing right hand side of wrong at Error.idr:12:1--13:1:
|
||||
Sorry, I can't find any elaboration which works. All errors:
|
||||
If Main.length: When unifying Nat and Vect ?n ?a
|
||||
Mismatch between:
|
||||
@ -8,6 +8,7 @@ and
|
||||
Vect ?n ?a
|
||||
at:
|
||||
12 wrong x = length x
|
||||
^
|
||||
|
||||
|
||||
If Data.List.length: When unifying Nat and List ?a
|
||||
@ -17,6 +18,7 @@ and
|
||||
List ?a
|
||||
at:
|
||||
12 wrong x = length x
|
||||
^
|
||||
|
||||
|
||||
If Prelude.length: When unifying Nat and String
|
||||
@ -26,5 +28,6 @@ and
|
||||
String
|
||||
at:
|
||||
12 wrong x = length x
|
||||
^
|
||||
|
||||
|
||||
|
@ -4,13 +4,12 @@ Can't find an implementation for Show (Vect 4 Integer) at:
|
||||
8 wrong = show (the (Vect _ _) [1,2,3,4])
|
||||
|
||||
1/1: Building Error2 (Error2.idr)
|
||||
Error2.idr:13:38--15:1:While processing right hand side of show at Error2.idr:13:3--15:1:
|
||||
Error2.idr:13:38--13:45:While processing right hand side of show at Error2.idr:13:3--15:1:
|
||||
Multiple solutions found in search of:
|
||||
Show (Vect k Integer)
|
||||
at:
|
||||
13 show (x :: xs) = show x ++ ", " ++ show xs
|
||||
14
|
||||
15 wrong : String
|
||||
^^^^^^^
|
||||
|
||||
Possible correct results:
|
||||
Show implementation at Error2.idr:11:1--15:1
|
||||
|
@ -1,11 +1,11 @@
|
||||
1/1: Building IfErr (IfErr.idr)
|
||||
IfErr.idr:4:11--6:1:While processing right hand side of foo at IfErr.idr:4:1--6:1:
|
||||
IfErr.idr:4:11--4:17:While processing right hand side of foo at IfErr.idr:4:1--6:1:
|
||||
Can't find an implementation for Eq a at:
|
||||
4 foo x y = x == y
|
||||
5
|
||||
6 bar : Wibble -> Wibble -> Bool
|
||||
^^^^^^
|
||||
|
||||
IfErr.idr:7:11--8:1:While processing right hand side of bar at IfErr.idr:7:1--8:1:
|
||||
IfErr.idr:7:11--7:17:While processing right hand side of bar at IfErr.idr:7:1--8:1:
|
||||
Can't find an implementation for Eq Wibble at:
|
||||
7 bar x y = x == y
|
||||
^^^^^^
|
||||
|
||||
|
@ -1,12 +1,11 @@
|
||||
1/1: Building IfErr (IfErr.idr)
|
||||
IfErr.idr:15:10--17:1:While processing right hand side of test at IfErr.idr:15:1--17:1:
|
||||
IfErr.idr:15:10--15:30:While processing right hand side of test at IfErr.idr:15:1--17:1:
|
||||
Can't find an implementation for Eq Foo at:
|
||||
15 test x = showIfEq MkFoo MkBar
|
||||
16
|
||||
17 Eq Foo where
|
||||
^^^^^^^^^^^^^^^^^^^^
|
||||
|
||||
IfErr.idr:23:9--25:1:While processing right hand side of test2 at IfErr.idr:23:1--25:1:
|
||||
IfErr.idr:23:9--23:29:While processing right hand side of test2 at IfErr.idr:23:1--25:1:
|
||||
Can't find an implementation for Show Foo at:
|
||||
23 test2 = showIfEq MkFoo MkBar
|
||||
24
|
||||
^^^^^^^^^^^^^^^^^^^^
|
||||
|
||||
|
@ -1,9 +1,10 @@
|
||||
1/1: Building CongErr (CongErr.idr)
|
||||
CongErr.idr:4:11--5:1:While processing right hand side of fsprf at CongErr.idr:4:1--5:1:
|
||||
CongErr.idr:4:11--4:19:While processing right hand side of fsprf at CongErr.idr:4:1--5:1:
|
||||
Can't solve constraint between:
|
||||
?_ x
|
||||
and
|
||||
FS x
|
||||
at:
|
||||
4 fsprf p = cong _ p
|
||||
^^^^^^^^
|
||||
|
||||
|
@ -1,3 +1,3 @@
|
||||
1/1: Building Loop (Loop.idr)
|
||||
Loop.idr:2:11--3:1:While processing right hand side of example at Loop.idr:2:1--3:1:
|
||||
Loop.idr:2:11--2:19:While processing right hand side of example at Loop.idr:2:1--3:1:
|
||||
Main.example is already defined
|
||||
|
@ -1,10 +1,10 @@
|
||||
1/3: Building Nat (Nat.idr)
|
||||
2/3: Building Mult (Mult.idr)
|
||||
3/3: Building Test (Test.idr)
|
||||
Test.idr:5:9--5:13:While processing type of thing at Test.idr:5:1--6:1:
|
||||
Test.idr:5:9--5:12:While processing type of thing at Test.idr:5:1--5:19:
|
||||
Undefined name Nat at:
|
||||
5 thing : Nat -> Nat
|
||||
^^^^
|
||||
^^^
|
||||
|
||||
Test.idr:6:1--8:1:No type declaration for Test.thing at:
|
||||
6 thing x = mult x (plus x x)
|
||||
|
@ -1,6 +1,6 @@
|
||||
1/1: Building Deps (Deps.idr)
|
||||
Deps.idr:18:13--19:3:While processing right hand side of badcard at Deps.idr:18:3--19:3:
|
||||
Deps.idr:18:13--18:14:While processing right hand side of badcard at Deps.idr:18:3--19:3:
|
||||
k is not accessible in this context at:
|
||||
18 badcard = k
|
||||
19 badto = id
|
||||
^
|
||||
|
||||
|
@ -1,6 +1,6 @@
|
||||
1/1: Building TypeInt (TypeInt.idr)
|
||||
TypeInt.idr:14:25--14:50:While processing constructor MkRecord at TypeInt.idr:14:3--15:1:
|
||||
TypeInt.idr:14:25--14:49:While processing constructor MkRecord at TypeInt.idr:14:3--14:61:
|
||||
Can't find an implementation for Interface ?s at:
|
||||
14 MkRecord : Value s -> DependentValue {s} value -> Record s
|
||||
^^^^^^^^^^^^^^^^^^^^^^^^^
|
||||
^^^^^^^^^^^^^^^^^^^^^^^^
|
||||
|
||||
|
@ -1,27 +1,26 @@
|
||||
1/1: Building gnu (gnu.idr)
|
||||
gnu.idr:47:27--49:1:While processing right hand side of TestSurprise1 at gnu.idr:47:1--49:1:
|
||||
gnu.idr:47:27--47:32:While processing right hand side of TestSurprise1 at gnu.idr:47:1--49:1:
|
||||
Multiple solutions found in search of:
|
||||
Gnu
|
||||
at:
|
||||
47 TestSurprise1 gnu1 gnu2 = Guess
|
||||
48
|
||||
49 TestSurprise2 : (f,g : Unit -> Gnu) -> String
|
||||
^^^^^
|
||||
|
||||
Possible correct results:
|
||||
gnu1
|
||||
gnu2
|
||||
gnu.idr:50:21--52:1:While processing right hand side of TestSurprise2 at gnu.idr:50:1--52:1:
|
||||
gnu.idr:50:21--50:26:While processing right hand side of TestSurprise2 at gnu.idr:50:1--52:1:
|
||||
Multiple solutions found in search of:
|
||||
Gnu
|
||||
at:
|
||||
50 TestSurprise2 f g = Guess
|
||||
51
|
||||
52 TestSurprise3 : (Unit -> Gnu, Unit -> Gnu) -> String
|
||||
^^^^^
|
||||
|
||||
Possible correct results:
|
||||
f ()
|
||||
g ()
|
||||
gnu.idr:53:19--54:1:While processing right hand side of TestSurprise3 at gnu.idr:53:1--54:1:
|
||||
gnu.idr:53:19--53:24:While processing right hand side of TestSurprise3 at gnu.idr:53:1--54:1:
|
||||
Can't find an implementation for Gnu at:
|
||||
53 TestSurprise3 f = Guess
|
||||
^^^^^
|
||||
|
||||
|
@ -1,10 +1,11 @@
|
||||
1/1: Building TwoNum (TwoNum.idr)
|
||||
TwoNum.idr:4:7--5:1:While processing right hand side of f at TwoNum.idr:2:1--5:1:
|
||||
TwoNum.idr:4:7--4:8:While processing right hand side of f at TwoNum.idr:2:1--5:1:
|
||||
While processing right hand side of f,g at TwoNum.idr:4:3--5:1:
|
||||
Multiple solutions found in search of:
|
||||
Num a
|
||||
at:
|
||||
4 g = 0
|
||||
^
|
||||
|
||||
Possible correct results:
|
||||
conArg
|
||||
|
@ -7,37 +7,37 @@ Main> (interactive):1:15--1:16:x is not accessible in this context at:
|
||||
1 efn (\x, y => x) -- Bad
|
||||
^
|
||||
|
||||
Main> (interactive):1:5--1:31:When unifying Nat -> Nat -> Nat and (0 _ : Nat) -> Nat -> Nat
|
||||
Main> (interactive):1:5--1:9:When unifying Nat -> Nat -> Nat and (0 _ : Nat) -> Nat -> Nat
|
||||
Mismatch between:
|
||||
Nat -> Nat -> Nat
|
||||
and
|
||||
(0 _ : Nat) -> Nat -> Nat
|
||||
at:
|
||||
1 efn plus -- Bad
|
||||
^^^^^^^^^^^^^^^^^^^^^^^^^^
|
||||
^^^^
|
||||
|
||||
Main> (interactive):1:5--1:31:When unifying (1 _ : Nat) -> Nat -> Nat and (0 _ : Nat) -> Nat -> Nat
|
||||
Main> (interactive):1:5--1:8:When unifying (1 _ : Nat) -> Nat -> Nat and (0 _ : Nat) -> Nat -> Nat
|
||||
Mismatch between:
|
||||
(1 _ : Nat) -> Nat -> Nat
|
||||
and
|
||||
(0 _ : Nat) -> Nat -> Nat
|
||||
at:
|
||||
1 efn lin -- Bad
|
||||
^^^^^^^^^^^^^^^^^^^^^^^^^^
|
||||
^^^
|
||||
|
||||
Main> (interactive):1:20--1:22:x is not accessible in this context at:
|
||||
Main> (interactive):1:20--1:21:x is not accessible in this context at:
|
||||
1 efn (\x, y => plus x y) -- Bad
|
||||
^^
|
||||
^
|
||||
|
||||
Main> S (S Z)
|
||||
Main> S (S Z)
|
||||
Main> (interactive):1:6--1:31:When unifying (0 _ : Nat) -> Nat -> Nat and Nat -> Nat -> Nat
|
||||
Main> (interactive):1:6--1:12:When unifying (0 _ : Nat) -> Nat -> Nat and Nat -> Nat -> Nat
|
||||
Mismatch between:
|
||||
(0 _ : Nat) -> Nat -> Nat
|
||||
and
|
||||
Nat -> Nat -> Nat
|
||||
at:
|
||||
1 okfn ignore -- Bad
|
||||
^^^^^^^^^^^^^^^^^^^^^^^^^
|
||||
^^^^^^
|
||||
|
||||
Main> Bye for now!
|
||||
|
@ -1,8 +1,8 @@
|
||||
1/1: Building ZFun (ZFun.idr)
|
||||
ZFun.idr:13:7--15:1:While processing right hand side of bar at ZFun.idr:13:1--15:1:
|
||||
ZFun.idr:13:7--13:15:While processing right hand side of bar at ZFun.idr:13:1--15:1:
|
||||
Main.test is not accessible in this context at:
|
||||
13 bar = test foo -- bad!
|
||||
14
|
||||
^^^^^^^^
|
||||
|
||||
Main> [tc] Main> 10
|
||||
[tc] Main> Bye for now!
|
||||
|
@ -1,3 +1,3 @@
|
||||
:cs 10 16 foo
|
||||
:cs 15 15 thing
|
||||
:cs 15 14 thing
|
||||
:q
|
||||
|
@ -1,6 +1,7 @@
|
||||
1/1: Building param (param.idr)
|
||||
1/1: Building parambad (parambad.idr)
|
||||
parambad.idr:7:7--8:1:While processing right hand side of U at parambad.idr:7:3--8:1:
|
||||
parambad.idr:7:7--7:10:While processing right hand side of U at parambad.idr:7:3--8:1:
|
||||
Name Main.X.foo is private at:
|
||||
7 U = foo
|
||||
^^^
|
||||
|
||||
|
@ -6,14 +6,14 @@ Main> 4.2
|
||||
Main> 4.2
|
||||
Main> 17.64
|
||||
Main> [1.1, 4.2]
|
||||
Main> (interactive):1:1--1:5:When unifying (?a -> ?b) -> ?f ?a -> ?f ?b and Point
|
||||
Main> (interactive):1:1--1:4:When unifying (?a -> ?b) -> ?f ?a -> ?f ?b and Point
|
||||
Mismatch between:
|
||||
(?a -> ?b) -> ?f ?a -> ?f ?b
|
||||
and
|
||||
Point
|
||||
at:
|
||||
1 map .x [MkPoint 1 2, MkPoint 3 4]
|
||||
^^^^
|
||||
^^^
|
||||
|
||||
Main> [2.5, 2.5]
|
||||
Main> 7.4
|
||||
|
@ -11,7 +11,7 @@ at:
|
||||
|
||||
Main> IApp (MkFC "quote.idr" (3, 12) (3, 23)) (IApp (MkFC "quote.idr" (3, 12) (3, 23)) (IVar (MkFC "quote.idr" (3, 12) (3, 23)) (UN "+")) (IApp (MkFC "quote.idr" (6, 13) (6, 14)) (IVar (MkFC "quote.idr" (6, 13) (6, 14)) (UN "fromInteger")) (IPrimVal (MkFC "quote.idr" (6, 13) (6, 14)) (BI 3)))) (IApp (MkFC "quote.idr" (6, 18) (6, 19)) (IVar (MkFC "quote.idr" (6, 18) (6, 19)) (UN "fromInteger")) (IPrimVal (MkFC "quote.idr" (6, 18) (6, 19)) (BI 4)))
|
||||
Main> IApp (MkFC "quote.idr" (3, 12) (3, 23)) (IApp (MkFC "quote.idr" (3, 12) (3, 23)) (IVar (MkFC "quote.idr" (3, 12) (3, 23)) (UN "+")) (IVar (MkFC "(interactive)" (0, 6) (0, 10)) (UN "True"))) (IVar (MkFC "(interactive)" (0, 14) (0, 19)) (UN "False"))
|
||||
Main> ILocal (MkFC "quote.idr" (10, 8) (12, 22)) [IClaim (MkFC "quote.idr" (10, 12) (11, 12)) MW Private [] (MkTy (MkFC "quote.idr" (10, 12) (11, 12)) (UN "xfn") (IPi (MkFC "quote.idr" (10, 18) (11, 12)) MW ExplicitArg Nothing (IPrimVal (MkFC "quote.idr" (10, 18) (10, 22)) IntType) (IPrimVal (MkFC "quote.idr" (10, 25) (11, 12)) IntType))), IDef (MkFC "quote.idr" (11, 12) (11, 30)) (UN "xfn") [PatClause (MkFC "quote.idr" (11, 12) (11, 30)) (IApp (MkFC "quote.idr" (11, 12) (11, 20)) (IVar (MkFC "quote.idr" (11, 12) (11, 16)) (UN "xfn")) (IBindVar (MkFC "quote.idr" (11, 16) (11, 20)) "var")) (IApp (MkFC "quote.idr" (11, 22) (11, 30)) (IApp (MkFC "quote.idr" (11, 22) (11, 30)) (IVar (MkFC "quote.idr" (11, 22) (11, 30)) (UN "*")) (IVar (MkFC "quote.idr" (11, 22) (11, 26)) (UN "var"))) (IApp (MkFC "quote.idr" (11, 28) (11, 30)) (IVar (MkFC "quote.idr" (11, 28) (11, 30)) (UN "fromInteger")) (IPrimVal (MkFC "quote.idr" (11, 28) (11, 30)) (BI 2))))]] (IApp (MkFC "quote.idr" (12, 12) (12, 22)) (IVar (MkFC "quote.idr" (12, 12) (12, 16)) (UN "xfn")) (IApp (MkFC "(interactive)" (0, 9) (0, 22)) (IApp (MkFC "(interactive)" (0, 9) (0, 22)) (IVar (MkFC "(interactive)" (0, 9) (0, 13)) (UN "the")) (IPrimVal (MkFC "(interactive)" (0, 13) (0, 17)) IntType)) (IApp (MkFC "(interactive)" (0, 17) (0, 22)) (IVar (MkFC "(interactive)" (0, 17) (0, 22)) (UN "fromInteger")) (IPrimVal (MkFC "(interactive)" (0, 17) (0, 22)) (BI 99994)))))
|
||||
Main> ILocal (MkFC "quote.idr" (16, 8) (18, 43)) [IClaim (MkFC "quote.idr" (16, 12) (17, 12)) MW Private [] (MkTy (MkFC "quote.idr" (16, 12) (17, 12)) (UN "xfn") (IPi (MkFC "quote.idr" (16, 18) (17, 12)) MW ExplicitArg Nothing (IPrimVal (MkFC "quote.idr" (16, 18) (16, 22)) IntType) (IPrimVal (MkFC "quote.idr" (16, 25) (17, 12)) IntType))), IDef (MkFC "quote.idr" (17, 12) (17, 30)) (UN "xfn") [PatClause (MkFC "quote.idr" (17, 12) (17, 30)) (IApp (MkFC "quote.idr" (17, 12) (17, 20)) (IVar (MkFC "quote.idr" (17, 12) (17, 16)) (UN "xfn")) (IBindVar (MkFC "quote.idr" (17, 16) (17, 20)) "var")) (IApp (MkFC "quote.idr" (17, 22) (17, 30)) (IApp (MkFC "quote.idr" (17, 22) (17, 30)) (IVar (MkFC "quote.idr" (17, 22) (17, 30)) (UN "*")) (IVar (MkFC "quote.idr" (17, 22) (17, 26)) (UN "var"))) (IApp (MkFC "quote.idr" (17, 28) (17, 30)) (IVar (MkFC "quote.idr" (17, 28) (17, 30)) (UN "fromInteger")) (IPrimVal (MkFC "quote.idr" (17, 28) (17, 30)) (BI 2))))]] (IApp (MkFC "quote.idr" (18, 12) (18, 43)) (IVar (MkFC "quote.idr" (18, 12) (18, 16)) (UN "xfn")) (IPrimVal EmptyFC (I 99994)))
|
||||
Main> ILocal (MkFC "quote.idr" (10, 8) (12, 22)) [IClaim (MkFC "quote.idr" (10, 12) (10, 28)) MW Private [] (MkTy (MkFC "quote.idr" (10, 12) (10, 28)) (UN "xfn") (IPi (MkFC "quote.idr" (10, 18) (10, 28)) MW ExplicitArg Nothing (IPrimVal (MkFC "quote.idr" (10, 18) (10, 21)) IntType) (IPrimVal (MkFC "quote.idr" (10, 25) (10, 28)) IntType))), IDef (MkFC "quote.idr" (11, 12) (11, 30)) (UN "xfn") [PatClause (MkFC "quote.idr" (11, 12) (11, 30)) (IApp (MkFC "quote.idr" (11, 12) (11, 19)) (IVar (MkFC "quote.idr" (11, 12) (11, 15)) (UN "xfn")) (IBindVar (MkFC "quote.idr" (11, 16) (11, 19)) "var")) (IApp (MkFC "quote.idr" (11, 22) (11, 29)) (IApp (MkFC "quote.idr" (11, 22) (11, 29)) (IVar (MkFC "quote.idr" (11, 22) (11, 29)) (UN "*")) (IVar (MkFC "quote.idr" (11, 22) (11, 25)) (UN "var"))) (IApp (MkFC "quote.idr" (11, 28) (11, 29)) (IVar (MkFC "quote.idr" (11, 28) (11, 29)) (UN "fromInteger")) (IPrimVal (MkFC "quote.idr" (11, 28) (11, 29)) (BI 2))))]] (IApp (MkFC "quote.idr" (12, 12) (12, 22)) (IVar (MkFC "quote.idr" (12, 12) (12, 15)) (UN "xfn")) (IApp (MkFC "(interactive)" (0, 9) (0, 22)) (IApp (MkFC "(interactive)" (0, 9) (0, 22)) (IVar (MkFC "(interactive)" (0, 9) (0, 12)) (UN "the")) (IPrimVal (MkFC "(interactive)" (0, 13) (0, 16)) IntType)) (IApp (MkFC "(interactive)" (0, 17) (0, 22)) (IVar (MkFC "(interactive)" (0, 17) (0, 22)) (UN "fromInteger")) (IPrimVal (MkFC "(interactive)" (0, 17) (0, 22)) (BI 99994)))))
|
||||
Main> ILocal (MkFC "quote.idr" (16, 8) (18, 43)) [IClaim (MkFC "quote.idr" (16, 12) (16, 28)) MW Private [] (MkTy (MkFC "quote.idr" (16, 12) (16, 28)) (UN "xfn") (IPi (MkFC "quote.idr" (16, 18) (16, 28)) MW ExplicitArg Nothing (IPrimVal (MkFC "quote.idr" (16, 18) (16, 21)) IntType) (IPrimVal (MkFC "quote.idr" (16, 25) (16, 28)) IntType))), IDef (MkFC "quote.idr" (17, 12) (17, 30)) (UN "xfn") [PatClause (MkFC "quote.idr" (17, 12) (17, 30)) (IApp (MkFC "quote.idr" (17, 12) (17, 19)) (IVar (MkFC "quote.idr" (17, 12) (17, 15)) (UN "xfn")) (IBindVar (MkFC "quote.idr" (17, 16) (17, 19)) "var")) (IApp (MkFC "quote.idr" (17, 22) (17, 29)) (IApp (MkFC "quote.idr" (17, 22) (17, 29)) (IVar (MkFC "quote.idr" (17, 22) (17, 29)) (UN "*")) (IVar (MkFC "quote.idr" (17, 22) (17, 25)) (UN "var"))) (IApp (MkFC "quote.idr" (17, 28) (17, 29)) (IVar (MkFC "quote.idr" (17, 28) (17, 29)) (UN "fromInteger")) (IPrimVal (MkFC "quote.idr" (17, 28) (17, 29)) (BI 2))))]] (IApp (MkFC "quote.idr" (18, 12) (18, 43)) (IVar (MkFC "quote.idr" (18, 12) (18, 15)) (UN "xfn")) (IPrimVal EmptyFC (I 99994)))
|
||||
Main> [UN "names", NS ["Prelude"] (UN "+")]
|
||||
Main> Bye for now!
|
||||
|
@ -5,26 +5,23 @@ LOG 0: Name: Prelude.Strings.++
|
||||
LOG 0: Type: (%pi Rig1 Explicit (Just _) String (%pi Rig1 Explicit (Just _) String String))
|
||||
LOG 0: Resolved name: Prelude.Nat
|
||||
LOG 0: Constructors: [Prelude.Z, Prelude.S]
|
||||
refprims.idr:37:10--39:1:While processing right hand side of dummy1 at refprims.idr:37:1--39:1:
|
||||
refprims.idr:37:10--37:27:While processing right hand side of dummy1 at refprims.idr:37:1--39:1:
|
||||
Error during reflection: Not really trying at:
|
||||
37 dummy1 = %runElab logPrims
|
||||
38
|
||||
39 dummy2 : a
|
||||
^^^^^^^^^^^^^^^^^
|
||||
|
||||
refprims.idr:40:10--42:1:While processing right hand side of dummy2 at refprims.idr:40:1--42:1:
|
||||
refprims.idr:40:10--40:30:While processing right hand side of dummy2 at refprims.idr:40:1--42:1:
|
||||
Error during reflection: Still not trying at:
|
||||
40 dummy2 = %runElab logDataCons
|
||||
41
|
||||
42 dummy3 : a
|
||||
^^^^^^^^^^^^^^^^^^^^
|
||||
|
||||
refprims.idr:43:10--45:1:While processing right hand side of dummy3 at refprims.idr:43:1--45:1:
|
||||
refprims.idr:43:10--43:25:While processing right hand side of dummy3 at refprims.idr:43:1--45:1:
|
||||
Error during reflection: Undefined name at:
|
||||
43 dummy3 = %runElab logBad
|
||||
44
|
||||
45 dummy4 : a
|
||||
^^^^^^^^^^^^^^^
|
||||
|
||||
refprims.idr:46:10--48:1:While processing right hand side of dummy4 at refprims.idr:46:1--48:1:
|
||||
refprims.idr:46:10--46:28:While processing right hand side of dummy4 at refprims.idr:46:1--48:1:
|
||||
Error during reflection: failed after generating Main.{plus:6078} at:
|
||||
46 dummy4 = %runElab tryGenSym
|
||||
47
|
||||
^^^^^^^^^^^^^^^^^^
|
||||
|
||||
|
@ -1,5 +1,5 @@
|
||||
1/1: Building refdecl (refdecl.idr)
|
||||
refdecl.idr:13:16--14:1:While processing right hand side of bad at refdecl.idr:13:1--14:1:
|
||||
refdecl.idr:13:16--13:29:While processing right hand side of bad at refdecl.idr:13:1--14:1:
|
||||
When unifying Elab () and Elab a
|
||||
Mismatch between:
|
||||
()
|
||||
@ -7,6 +7,7 @@ and
|
||||
a
|
||||
at:
|
||||
13 bad = %runElab mkDecls `(94)
|
||||
^^^^^^^^^^^^^
|
||||
|
||||
Main> 9400
|
||||
Main> Bye for now!
|
||||
|
@ -2,7 +2,8 @@
|
||||
LOG 0: [x, y]
|
||||
LOG 0: Left: ((Prelude.plus x) y)
|
||||
LOG 0: Right: ((Prelude.plus y) x)
|
||||
refleq.idr:24:16--25:1:While processing right hand side of commutes at refleq.idr:24:1--25:1:
|
||||
refleq.idr:24:16--24:21:While processing right hand side of commutes at refleq.idr:24:1--25:1:
|
||||
Error during reflection: Not done at:
|
||||
24 commutes x y = prove
|
||||
^^^^^
|
||||
|
||||
|
@ -1,23 +1,23 @@
|
||||
1/1: Building Holes (Holes.idr)
|
||||
Holes.idr:4:64--4:85:While processing type of Vect_ext at Holes.idr:4:1--7:1:
|
||||
Holes.idr:4:64--4:85:While processing type of Vect_ext at Holes.idr:4:1--5:11:
|
||||
Undefined name ~=~ at:
|
||||
4 Vect_ext : (v : Vect n a) -> (w : Vect n a) -> ((i : Fin n) -> index i v = index i w)
|
||||
^^^^^^^^^^^^^^^^^^^^^
|
||||
|
||||
Holes.idr:7:26--8:1:While processing type of Weird at Holes.idr:7:1--8:1:
|
||||
Holes.idr:7:26--7:31:While processing type of Weird at Holes.idr:7:1--7:31:
|
||||
Undefined name ~=~ at:
|
||||
7 Weird : (v: Vect n a) -> v = v
|
||||
8 Weird v = Vect_ext ?hole0 ?hole1 ?hole2
|
||||
^^^^^
|
||||
|
||||
Holes.idr:8:1--10:1:No type declaration for Main.Weird at:
|
||||
8 Weird v = Vect_ext ?hole0 ?hole1 ?hole2
|
||||
9
|
||||
10 f : Bool -> Nat
|
||||
|
||||
Holes.idr:10:5--10:10:While processing type of f at Holes.idr:10:1--11:1:
|
||||
Holes.idr:10:5--10:9:While processing type of f at Holes.idr:10:1--10:16:
|
||||
Undefined name Bool at:
|
||||
10 f : Bool -> Nat
|
||||
^^^^^
|
||||
^^^^
|
||||
|
||||
Holes.idr:11:1--12:1:No type declaration for Main.f at:
|
||||
11 f True = 0
|
||||
|
@ -1,9 +1,10 @@
|
||||
1/1: Building iftype (iftype.idr)
|
||||
iftype.idr:15:15--16:1:While processing right hand side of isInListBad at iftype.idr:15:1--16:1:
|
||||
iftype.idr:15:15--15:19:While processing right hand side of isInListBad at iftype.idr:15:1--16:1:
|
||||
Can't solve constraint between:
|
||||
if c then "Foo" else "Baz"
|
||||
and
|
||||
if c then "Foo" else "Bar"
|
||||
at:
|
||||
15 isInListBad = Here
|
||||
^^^^
|
||||
|
||||
|
@ -1,17 +1,17 @@
|
||||
1/1: Building UnboundImplicits (UnboundImplicits.idr)
|
||||
UnboundImplicits.idr:6:22--6:24:While processing constructor Foo at UnboundImplicits.idr:6:1--9:1:
|
||||
UnboundImplicits.idr:6:22--6:23:While processing constructor Foo at UnboundImplicits.idr:6:1--9:1:
|
||||
Undefined name n at:
|
||||
6 record Foo (x : Vect n Nat) where
|
||||
^^
|
||||
^
|
||||
|
||||
UnboundImplicits.idr:9:24--9:26:Undefined name n at:
|
||||
UnboundImplicits.idr:9:24--9:25:Undefined name n at:
|
||||
9 parameters (Foo : Vect n Nat)
|
||||
^^
|
||||
^
|
||||
|
||||
UnboundImplicits.idr:14:25--14:27:While processing constructor Foo at UnboundImplicits.idr:14:1--17:1:
|
||||
UnboundImplicits.idr:14:25--14:26:While processing constructor Foo at UnboundImplicits.idr:14:1--15:12:
|
||||
Undefined name n at:
|
||||
14 interface Foo (a : Vect n Nat) where
|
||||
^^
|
||||
^
|
||||
|
||||
UnboundImplicits.idr:17:30--17:31:While processing type of Functor implementation at UnboundImplicits.idr:17:1--18:1 at UnboundImplicits.idr:17:1--18:1:
|
||||
Undefined name n at:
|
||||
|
@ -1,4 +1,5 @@
|
||||
1/1: Building anyfail (anyfail.idr)
|
||||
anyfail.idr:21:1--22:1:showing (MkEvenMoreComplicated (MkMoreComplicated (MkComplicated (PtrAndSize addr len)))) SomethingVeryComplicatedIs is not a valid impossible case at:
|
||||
anyfail.idr:21:1--21:48:showing (MkEvenMoreComplicated (MkMoreComplicated (MkComplicated (PtrAndSize addr len)))) SomethingVeryComplicatedIs is not a valid impossible case at:
|
||||
21 showing _ SomethingVeryComplicatedIs impossible
|
||||
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
|
||||
|
||||
|
@ -17,11 +17,12 @@ at:
|
||||
8 main2 = printLn $ or (map (\x => x) bools)
|
||||
^^^^^^^^^^^^^^^^^^^
|
||||
|
||||
lazybug.idr:14:22--15:1:While processing right hand side of main4 at lazybug.idr:14:1--15:1:
|
||||
lazybug.idr:14:22--14:27:While processing right hand side of main4 at lazybug.idr:14:1--15:1:
|
||||
Can't solve constraint between:
|
||||
Bool
|
||||
and
|
||||
Lazy Bool
|
||||
at:
|
||||
14 main4 = printLn $ or bools
|
||||
^^^^^
|
||||
|
||||
|
@ -1,10 +1,10 @@
|
||||
1/1: Building boom (boom.idr)
|
||||
boom.idr:23:42--24:3:While processing right hand side of with block in eraseVar at boom.idr:23:3--24:3:
|
||||
boom.idr:23:42--23:66:While processing right hand side of with block in eraseVar at boom.idr:23:3--24:3:
|
||||
Can't solve constraint between:
|
||||
S (countGreater thr xs)
|
||||
and
|
||||
countGreater thr xs
|
||||
at:
|
||||
23 eraseVar thr (x :: xs) (FS i) | True = FS <$> eraseVar thr xs i
|
||||
24 eraseVar thr (x :: xs) (FS i) | False = FS <$> eraseVar thr xs i
|
||||
^^^^^^^^^^^^^^^^^^^^^^^^
|
||||
|
||||
|
@ -1,14 +1,12 @@
|
||||
1/1: Building partial (partial.idr)
|
||||
partial.idr:5:1--7:1:foo is not covering at:
|
||||
partial.idr:5:1--6:19:foo is not covering at:
|
||||
5 total
|
||||
6 foo : Maybe a -> a
|
||||
7 foo (Just x) = x
|
||||
Missing cases:
|
||||
foo Nothing
|
||||
partial.idr:13:1--15:1:qsortBad is not total:
|
||||
partial.idr:13:1--14:37:qsortBad is not total:
|
||||
possibly not terminating due to recursive path Main.qsortBad -> Main.qsortBad -> Main.qsortBad
|
||||
at:
|
||||
13 total
|
||||
14 qsortBad : Ord a => List a -> List a
|
||||
15 qsortBad [] = []
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user