c28d0c6c80
- rename example modules from "example" to "swigexample", to avoid a warning from shadowing the Octave built-in function "example" - remove deprecated "static" Makefile targets: there is no longer an option to build static Octave modules in the Examples Makefile - emacs whitespace cleanup run on all files
21 lines
312 B
C
21 lines
312 B
C
/* File : example.c */
|
|
|
|
/* A global variable */
|
|
double Foo = 3.0;
|
|
|
|
/* Compute the greatest common divisor of positive integers */
|
|
int gcd(int x, int y) {
|
|
int g;
|
|
g = y;
|
|
while (x > 0) {
|
|
g = x;
|
|
x = y % x;
|
|
y = g;
|
|
}
|
|
return g;
|
|
}
|
|
|
|
int fact(int n) {
|
|
if (n <= 0) return 1;
|
|
return n*fact(n-1);
|
|
}
|