source: CIVL/examples/fortran/smack/compute_fail.f90@ 3d3af8f

1.23 2.0 acw/focus-triggers main test-branch
Last change on this file since 3d3af8f was e3f356c, checked in by Wenhao Wu <wuwenhao@…>, 5 years ago

merge from branch omptrans for tacas2022

git-svn-id: ​svn://vsl.cis.udel.edu/civl/trunk@5471 fb995dde-84ed-4084-dfe6-e5aef3e2452c
  • Property mode set to 100755
File size: 123 bytes
RevLine 
[e3f356c]1! @expect error
2
3program compute
4 integer :: x,y,z
5 x=10
6 y=20
7 z=x+y
8 !print *, z == 30
9 !$CVL $assert(z /= 30)
10end
Note: See TracBrowser for help on using the repository browser.