source: CIVL/examples/contracts/with.cvl@ 7d55df1

1.23 2.0 acw/focus-triggers main test-branch
Last change on this file since 7d55df1 was a55a02c, checked in by Manchun Zheng <zmanchun@…>, 10 years ago

fixed implementation of $with.

git-svn-id: svn://vsl.cis.udel.edu/civl/trunk@3482 fb995dde-84ed-4084-dfe6-e5aef3e2452c

  • Property mode set to 100644
File size: 321 bytes
RevLine 
[13b3e46]1#include<collate.cvh>
2
[a55a02c]3$gcollator gcollator=$gcollator_create($here, 1);
4$collator collator=$collator_create(gcollator, $here, 0);
[13b3e46]5
6int main(){
[a55a02c]7 $collate_state cs;
8
9 cs=$collate_arrives(collator, $here);
[13b3e46]10
[a55a02c]11 $with (cs) {
[13b3e46]12 $assert($true);
13 }
[a55a02c]14 $collate_departs(collator);
[13b3e46]15 $free(collator);
16 $free(gcollator);
17}
Note: See TracBrowser for help on using the repository browser.