GaloisInc/cryptol
1
1
Fork 0
mirror of https://github.com/GaloisInc/cryptol.git synced 2024-12-29 10:53:31 +03:00
Code Issues Projects Releases Wiki Activity

Add regression test for issue #614.

Browse Source
This commit is contained in:
Brian Huffman 2019-12-13 11:13:03 -08:00
parent ccd388da2a
commit 4b29967315
3 changed files with 23 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
tests/issues/issue614.cry Normal file
View File

@ -0,0 +1,6 @@
f : {m, n, k} (n == max 2 m k == m + 1) => [m] -> [k][n]
f x = zero
g : {n, k} (fin n, fin k, 0 < n <= k) => [n] -> [k]
g x = sext x

1
tests/issues/issue614.icry Normal file
View File

@ -0,0 +1 @@
:l issue614.cry

16
tests/issues/issue614.icry.stdout Normal file
View File

@ -0,0 +1,16 @@
Loading module Cryptol
Loading module Cryptol
Loading module Main
[error] at issue614.cry:1:18--1:20 and issue614.cry:1:31--1:33
The fixities of
• (==) (precedence 20, non-associative)
• (==) (precedence 20, non-associative)
are not compatible.
You may use explicit parentheses to disambiguate.
[error] at issue614.cry:5:29--5:30 and issue614.cry:5:33--5:35
The fixities of
• (<) (precedence 30, non-associative)
• (<=) (precedence 30, non-associative)
are not compatible.
You may use explicit parentheses to disambiguate.