diff options
| author | Gabriel Kerneis | 2014-06-02 15:46:40 +0100 |
|---|---|---|
| committer | Gabriel Kerneis | 2014-06-02 15:47:43 +0100 |
| commit | 978f5bc208248afe284bb9488c4e892e9315c8a2 (patch) | |
| tree | cdf934555f7fb91a48cac8f4a36d9a1fac6279fd /src/test | |
| parent | 709066442759bdf4bb4fb16a66da3a31ba55e24c (diff) | |
Fix dependent-type for MEM in power.sail
Now, constraint resolution works for test/power.sail
Diffstat (limited to 'src/test')
| -rw-r--r-- | src/test/power.sail | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/test/power.sail b/src/test/power.sail index 9cf49dc3..02b4555f 100644 --- a/src/test/power.sail +++ b/src/test/power.sail @@ -91,7 +91,7 @@ register (vector <0, 64, inc, bit>) DCR1 let (vector <0, 2, inc, (register<(vector<0, 64, inc, bit>)>) >) DCR = [ DCR0, DCR1 ] -val extern ( nat , nat ) -> (bit[64]) effect { wmem , rmem } MEM +val extern forall Nat 'n. ( nat , [|'n|] ) -> (bit[8 * 'n]) effect { wmem , rmem } MEM (* XXX effect for trap? *) val extern unit -> unit effect pure trap |