diff options
author | 2015-11-15 17:47:24 +0100 | |
---|---|---|
committer | 2015-11-15 17:48:18 +0100 | |
commit | 73c9ad1ff19915fbaf053119c5498ff1314e92e3 (patch) | |
tree | a342dae9036fc1a8e7f5dd8fa2a383d47662c3a0 /test-suite/output/Cases.out | |
parent | 3b2c4cb7f53ff664b72e21ca9a653f244624833e (diff) |
Fixing output test Cases.v.
Not sure if this is really what is expected though.
Diffstat (limited to 'test-suite/output/Cases.out')
-rw-r--r-- | test-suite/output/Cases.out | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/test-suite/output/Cases.out b/test-suite/output/Cases.out index 09f032d47..f846f4ee1 100644 --- a/test-suite/output/Cases.out +++ b/test-suite/output/Cases.out @@ -47,10 +47,10 @@ foo' = if A 0 then true else false f = fun H : B => match H with -| AC x => - (let b0 := b in - if b0 as b return (P b -> True) +| AC H0 => + let b0 := b in + (if b0 as b return (P b -> True) then fun _ : P true => Logic.I - else fun _ : P false => Logic.I) x + else fun _ : P false => Logic.I) H0 end : B -> True |