/[cvs]/stack/fib.st
ViewVC logotype

Annotation of /stack/fib.st

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.3 - (hide annotations)
Sun Mar 10 13:26:44 2002 UTC (22 years, 2 months ago) by teddy
Branch: MAIN
Changes since 1.2: +1 -1 lines
.cvsignore: Ignore all gcov-related files.
Makefile (CFLAGS): Do not include any gprof or gcov flags by default.
(stack): Moved "-pg" to the alternate CFLAGS line.
(check): Changed to 6765.
fib.st: Increased to "20"; it's faster now.

1 teddy 1.1 #!./stack
2     [ dup;
3     1 >;
4     [ dup; 1 -; fib; swap; 2 -; fib; +; ]
5     if;
6     ]
7     fib def;
8    
9 teddy 1.3 20 fib;
10 teddy 1.1 print;

root@recompile.se
ViewVC Help
Powered by ViewVC 1.1.26