mirror of
https://github.com/GaloisInc/cryptol.git
synced 2024-12-16 11:22:33 +03:00
13 lines
255 B
Plaintext
13 lines
255 B
Plaintext
|
|
||
|
|
import Cryptol as c
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Test that qualified infix operators work
|
||
|
|
*/
|
||
|
|
test1 = [c::True,c::False] c::+ [c::True,c::False] c::== c::zero
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Test that qualified operators used in prefix form work
|
||
|
|
*/
|
||
|
|
test2 = (c::+) c::zero [c::True] c::== [c::True]
|