From 25156e2434cf5c1a46e6a1f5064ab2147d0d8466 Mon Sep 17 00:00:00 2001 From: Peter Bex Date: Sat, 11 Aug 2018 12:10:50 +0200 Subject: Port to CHICKEN 5 (with backwards compat in CHICKEN 4) --- pseudo-meta-egg-info.scm | 14 ++++++++++++-- 1 file changed, 12 insertions(+), 2 deletions(-) (limited to 'pseudo-meta-egg-info.scm') diff --git a/pseudo-meta-egg-info.scm b/pseudo-meta-egg-info.scm index e97da9d..a77ec2f 100644 --- a/pseudo-meta-egg-info.scm +++ b/pseudo-meta-egg-info.scm @@ -7,9 +7,19 @@ (module pseudo-meta-egg-info (egg-repo release-info files-list) -(import chicken scheme) -(use extras data-structures spiffy intarweb uri-common svn-client) +(import scheme) ;; Hack to get cond-expand in CHICKEN 4 + +(cond-expand + (chicken-4 + (import chicken) + (use extras data-structures spiffy intarweb uri-common svn-client)) + (chicken-5 + (import (chicken base) (chicken string) (chicken format) + spiffy intarweb uri-common svn-client))) +;; When missing, we default to 4 for backwards compat reasons. This +;; should probably never be changed (at best, we can completely remove +;; it at some point) (define *default-chicken-release* "4") (define egg-repo -- cgit v1.2.3