source: CIVL/examples/languageFeatures/bundleSize.cvl@ 04c71e3

/* Commandline execution:
 *              civl verify bundleSize.cvl
 * */
#include<civlc.cvh>
#include<bundle.cvh>

int N=5;
$input double a[N];

void main() {
  $bundle bun;
  int size;
  
  bun = $bundle_pack(&a[0], N*sizeof(double));
  size = $bundle_size(bun);
  $assert(size == N*sizeof(double));
  $assert(size / sizeof(double) == N);
}