/tags/rel-1-3-15/SWIG/Examples/ocaml/simple/example.c
C | 18 lines | 11 code | 4 blank | 3 comment | 1 complexity | e23a52329483450248d1cc30b9f369a0 MD5 | raw file
Possible License(s): LGPL-2.1, Cube, GPL-3.0, 0BSD, GPL-2.0
1/* File : example.c */
2
3/* A global variable */
4double Foo = 3.0;
5
6/* Compute the greatest common divisor of positive integers */
7int gcd(int x, int y) {
8 int g;
9 g = y;
10 while (x > 0) {
11 g = x;
12 x = y % x;
13 y = g;
14 }
15 return g;
16}
17
18