source:
CIVL/examples/languageFeatures/bundle.cvl@
1f192b0
| Last change on this file since 1f192b0 was 888ec66, checked in by , 13 years ago | |
|---|---|
|
|
| File size: 282 bytes | |
| Rev | Line | |
|---|---|---|
| [888ec66] | 1 | #include<civlc.h> |
| 2 | ||
| 3 | int N=5; | |
| 4 | $input double a[N]; | |
| 5 | ||
| 6 | void main() { | |
| 7 | double b[N]; | |
| 8 | $bundle bun; | |
| 9 | ||
| 10 | for (int i=0; i<N; i++) a[i] = i; | |
| 11 | bun = $bundle_pack(&a[0], 3*sizeof(double)); | |
| 12 | $bundle_unpack(bun, &b[0], 3*sizeof(double)); | |
| 13 | for (int i=0; i<3; i++) | |
| 14 | $assert(b[i] == a[i]); | |
| 15 | } |
Note:
See TracBrowser
for help on using the repository browser.
