Celestin Apprentice 7/Apprentice-Release7.iso/Environments/Small Eiffel 0.4.8/lib_show/cecil/example2/c_prog.c

C/C++ Source or Header | 1997-04-13 | 249 b | 17 lines | [TEXT/CWIE]

#include <stdio.h>
#include "eiffel.h"

c_prog (void *values) {
  int i;
  int val;

  for (i=array_of_int_lower(values);
       i <= array_of_int_upper(values);
       i++) {
    val = array_of_int_item(values,i);
    printf("%d\n",val);
  }
}