commit 65308b8eb2069d1311d734bc7060f491dfa43180 parent fbd1f183289ba930d8d6dc26fe7b259f5c002479 Author: Alexander Burger <abu@software-lab.de> Date: Sun, 10 Jul 2011 09:03:48 +0200 Minor cosmetics Diffstat:
| M | doc/refC.html | | | 2 | +- |
| M | misc/fibo.l | | | 4 | ++-- |
2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/doc/refC.html b/doc/refC.html @@ -36,7 +36,7 @@ calculation. See also <code><a href="refH.html#hash">hash</a></code>. <pre><code> : (de fibonacci (N) - (cache '*Fibo (pack (char (hash N)) N) + (cache '(NIL) (pack (char (hash N)) N) (if (> 2 N) 1 (+ diff --git a/misc/fibo.l b/misc/fibo.l @@ -1,4 +1,4 @@ -# 09jul11abu +# 10jul11abu # (c) Software Lab. Alexander Burger # Standard version @@ -26,7 +26,7 @@ # Using a cache (fastest) (de cachedFibo (N) - (cache '*Fibo (pack (char (hash N)) N) + (cache '(NIL) (pack (char (hash N)) N) (if (> 2 N) 1 (+ (cachedFibo (dec N)) (cachedFibo (- N 2))) ) ) )