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

void main() {
  $scope s = $here;
  double *p = (double *) $malloc(s, 5*sizeof(double));
  
  p[4]=3.14;
  $assert((p[4]==3.14));
  $free(p);
}