[aisleriot] guile: Remove definition of list-head from api.scm
- From: Christian Persch <chpe src gnome org>
- To: commits-list gnome org
- Cc:
- Subject: [aisleriot] guile: Remove definition of list-head from api.scm
- Date: Sat, 3 Dec 2011 16:49:40 +0000 (UTC)
commit 754f6b0714aeeca9c8e6b1f528de8d46e02535f2
Author: Christian Persch <chpe gnome org>
Date: Wed Nov 30 19:07:47 2011 +0100
guile: Remove definition of list-head from api.scm
WARNING: (guile-user): imported module (aisleriot api) overrides core binding `list-head'
games/api.scm | 6 ------
1 files changed, 0 insertions(+), 6 deletions(-)
---
diff --git a/games/api.scm b/games/api.scm
index 2963037..7897f70 100644
--- a/games/api.scm
+++ b/games/api.scm
@@ -623,12 +623,6 @@
(define-public (nthcdr n lst)
(if (zero? n) lst (nthcdr (+ -1 n) (cdr lst))))
-; guile library function I'm not sure I can rely on
-(define-public (list-head lst k)
- (if (= k 0)
- '()
- (cons (car lst) (list-head (cdr lst) (- k 1)))))
-
;; INTERNAL procedures
; global variables
[
Date Prev][
Date Next] [
Thread Prev][
Thread Next]
[
Thread Index]
[
Date Index]
[
Author Index]