source: CIVL/mods/dev.civl.com/examples/fortran/smack/compound_fail.f90@ cb4d4f4

main test-branch
Last change on this file since cb4d4f4 was aad342c, checked in by Stephen Siegel <siegel@…>, 3 years ago

Performing huge refactor to incorporate ABC, GMC, and SARL into CIVL repo and use Java modules.

git-svn-id: ​svn://vsl.cis.udel.edu/civl/trunk@5664 fb995dde-84ed-4084-dfe6-e5aef3e2452c
  • Property mode set to 100755
File size: 243 bytes
Line 
1! @expect error
2
3program main
4 implicit none
5 type Location
6 integer x
7 integer y
8 end type Location
9
10 type(Location) :: p
11 p = Location(2,3)
12 !print *, p%x == 3
13 !$CVL $assert(p%x /= 2)
14 !$CVL $assert(p%y == 3)
15end program main
Note: See TracBrowser for help on using the repository browser.