FStarLang/FStar

Ghost to Pure promotion doesn't seem to work with conditionals

Open

#610 aperta il 12 ago 2016

Vedi su GitHub
 (3 commenti) (0 reazioni) (1 assegnatario)F* (258 fork)auto 404
good first issuekind/bug

Metriche repository

Star
 (3068 star)
Metriche merge PR
 (Metriche PR in attesa)

Descrizione

module Test

assume val f : int -> GTot bool

let works (unit) : Tot int = 
  let _ = 
     let y = f 0 in 
     assert (y ==> 0=0);
     assert (not y ==> 1=1) in
  0

let fails (unit) : Tot int = 
  let _ = 
     let y = f 0 in 
     if y
     then assert (0=0)
     else assert (1=1) in
  0

Guida contributor