/trunk/Examples/perl5/pointer/example.c

 1/* File : example.c */
 2
 3void add(int *x, int *y, int *result) {
 4  *result = *x + *y;
 5}
 6
 7void subtract(int *x, int *y, int *result) {
 8  *result = *x - *y;
 9}
10
11int divide(int n, int d, int *r) {
12   int q;
13   q = n/d;
14   *r = n - q*d;
15   return q;
16}