Mercurial > hg > CbC > old > device

annotate test/fact0.c @ 145:fb61020a9b48

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix macro creg and freg unify
author kono
date Fri, 23 May 2003 13:27:48 +0900
parents fdbf2fbc8140
children 096559f07a70
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
d35df41eac69 Initial revision
kono
parents:
diff changeset
1 #include "stdio.h"
d35df41eac69 Initial revision
kono
parents:
diff changeset
2
d35df41eac69 Initial revision
kono
parents:
diff changeset
3 main(ac,av)
d35df41eac69 Initial revision
kono
parents:
diff changeset
4 int ac;
d35df41eac69 Initial revision
kono
parents:
diff changeset
5 char *av[];
d35df41eac69 Initial revision
kono
parents:
diff changeset
6 {
d35df41eac69 Initial revision
kono
parents:
diff changeset
7 printf("%d\n",fact(1,1,atoi(av[1])));
d35df41eac69 Initial revision
kono
parents:
diff changeset
8 }
d35df41eac69 Initial revision
kono
parents:
diff changeset
9
d35df41eac69 Initial revision
kono
parents:
diff changeset
10 int
d35df41eac69 Initial revision
kono
parents:
diff changeset
11 fact(i,j,n)
d35df41eac69 Initial revision
kono
parents:
diff changeset
12 /*register*/ int i,j,n;
d35df41eac69 Initial revision
kono
parents:
diff changeset
13 {
d35df41eac69 Initial revision
kono
parents:
diff changeset
14 if (i==n)
d35df41eac69 Initial revision
kono
parents:
diff changeset
15 return j;
17
fdbf2fbc8140 *** empty log message ***
kono
parents: 0
diff changeset
16 /* return */ fact(i+1,j*i,n);
0
d35df41eac69 Initial revision
kono
parents:
diff changeset
17 }