Add more tests for passing on parameters

This commit is contained in:
Iavor Diatchki 2022-07-18 11:36:42 +03:00
parent a2bc669b66
commit 694282e517
9 changed files with 79 additions and 0 deletions

View File

@ -0,0 +1,21 @@
interface submodule S where
x : [8]
submodule G where
import interface submodule S
y = x + 1
submodule F where
import interface submodule S as A
submodule H where
import submodule G { interface A }
z = A::x + y
import submodule F where
x = 5
import submodule H

View File

@ -0,0 +1,2 @@
:load T026.cry
z

View File

@ -0,0 +1,4 @@
Loading module Cryptol
Loading module Cryptol
Loading module Main
0x0b

View File

@ -0,0 +1,23 @@
interface submodule S where
x : [8]
submodule G where
import interface submodule S
y = x + 1
submodule F where
import interface submodule S as A
submodule H where
import interface submodule S as A
import submodule G { interface A }
z = A::x + y
import submodule F where
x = 5
import submodule H where
x = 6

View File

@ -0,0 +1,2 @@
:load T027.cry
z

View File

@ -0,0 +1,4 @@
Loading module Cryptol
Loading module Cryptol
Loading module Main
0x0d

View File

@ -0,0 +1,17 @@
interface submodule S where
x : [8]
submodule G where
import interface submodule S
y = x + 1
submodule F where
import interface submodule S
import submodule G { interface S }
z = x + y
import submodule F where
x = 5

View File

@ -0,0 +1,2 @@
:load T028.cry
z

View File

@ -0,0 +1,4 @@
Loading module Cryptol
Loading module Cryptol
Loading module Main
0x0b