aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guix/utils.scm20
1 files changed, 0 insertions, 20 deletions
diff --git a/guix/utils.scm b/guix/utils.scm
index 2c905cafb7..3e334f9fa6 100644
--- a/guix/utils.scm
+++ b/guix/utils.scm
@@ -589,26 +589,6 @@ FIELD/DEFAULT-VALUE tuples."
(hash-set! cache args results)
(apply values results)))))))
-(define-syntax hash-set-proc
- (syntax-rules (eq? eqv? equal?)
- ((_ eq?) hashq-set!)
- ((_ eqv?) hashv-set!)
- ((_ equal?) hash-set!)))
-
-(define-syntax hash-ref*
- (syntax-rules (eq? eqv? equal?)
- ((_ table key eq?) (hashq-ref table key))
- ((_ table key eqv?) (hashv-ref table key))
- ((_ table key equal?) (hash-ref table key))))
-
-(define-syntax memoizing-lambda
- (syntax-rules ()
- ((_ ((arg type) ...) body ...)
- (let ((cache (make-weak-key-hash-table 100)))
- (lambda (arg ...)
- (or (and (hash-ref* cache)))
- )))))
-
(define (gnu-triplet->nix-system triplet)
"Return the Nix system type corresponding to TRIPLET, a GNU triplet as
returned by `config.guess'."