diff options
| author | Ben Sima <ben@bsima.me> | 2019-11-22 12:37:55 -0800 |
|---|---|---|
| committer | Ben Sima <ben@bsima.me> | 2019-11-22 12:37:55 -0800 |
| commit | a89f4f145f586767097fef3760cd3fbea17c7cb3 (patch) | |
| tree | e711d9fef468d1731f492b6f50a45acbe248c9bb | |
| parent | 1663e2784dca658e81f34f89aaf87bb112bcc0bf (diff) | |
Redefine 'second'
| -rw-r--r-- | Com/Simatime/core.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Com/Simatime/core.scm b/Com/Simatime/core.scm index 59288a4..91d9339 100644 --- a/Com/Simatime/core.scm +++ b/Com/Simatime/core.scm @@ -66,8 +66,8 @@ "Returns the next item after the first." (cadr a)) -(define (second a) - (first (next a))) +;; same thing, easier to remember/read +(define second next) (define (ffirst a) (first (first a))) |