From 70622749208bc6b69289a33c525d896846687b63 Mon Sep 17 00:00:00 2001 From: Arun Isaac Date: Sun, 23 Jan 2022 17:40:01 +0530 Subject: bin: Define assq-ref for R6RS compatibility. * bin/run64 (assq-ref): New function. --- bin/run64 | 3 +++ 1 file changed, 3 insertions(+) diff --git a/bin/run64 b/bin/run64 index 8091fe1..5334084 100755 --- a/bin/run64 +++ b/bin/run64 @@ -22,6 +22,9 @@ (srfi srfi-1) (srfi srfi-64)) +(define (assq-ref alist key) + (cdr (assq key alist))) + (define (color code str) (string-append (string #\esc) "[" -- cgit v1.2.3