From ffb6f4aa296e93cdb534cacaad467609defdf302 Mon Sep 17 00:00:00 2001
From: Alaric Snell-Pym <alaric@register-dynamics.co.uk>
Date: Tue, 24 Nov 2020 13:04:17 +0000
Subject: Support Chicken 5


diff --git a/md2.egg b/md2.egg
new file mode 100644
index 0000000..7c7b90f
--- /dev/null
+++ b/md2.egg
@@ -0,0 +1,10 @@
+((license "BSD")
+ (category crypt)
+ (dependencies message-digest)
+ (test-dependencies test message-digest)
+ (author "Tobias Heilig")
+ (synopsis "Message Digest 2 algorithm as defined in RFC1319")
+ (version "1.2")
+ (components
+  (extension md2)))
+
diff --git a/md2.scm b/md2.scm
index dba2f3d..09e27a1 100644
--- a/md2.scm
+++ b/md2.scm
@@ -41,10 +41,18 @@
         (md2-primitive)
 
 
-  (import chicken scheme foreign)
-
-  (use message-digest)
+  (import scheme)
 
+  (cond-expand
+   (chicken-4
+    (import chicken)
+    (import foreign)
+    (use message-digest))
+   (chicken-5
+    (import (chicken base))
+    (import (chicken foreign))
+    (import message-digest)))
+  
 
   #>#include "md2-base.c"<#