summaryrefslogtreecommitdiff
path: root/dev-scheme/gauche-qdbm/files/gauche-qdbm-0.2-undefined-reference.diff
diff options
context:
space:
mode:
Diffstat (limited to 'dev-scheme/gauche-qdbm/files/gauche-qdbm-0.2-undefined-reference.diff')
-rw-r--r--dev-scheme/gauche-qdbm/files/gauche-qdbm-0.2-undefined-reference.diff11
1 files changed, 11 insertions, 0 deletions
diff --git a/dev-scheme/gauche-qdbm/files/gauche-qdbm-0.2-undefined-reference.diff b/dev-scheme/gauche-qdbm/files/gauche-qdbm-0.2-undefined-reference.diff
new file mode 100644
index 000000000000..d6a6efb99b4f
--- /dev/null
+++ b/dev-scheme/gauche-qdbm/files/gauche-qdbm-0.2-undefined-reference.diff
@@ -0,0 +1,11 @@
+--- Gauche-qdbm-0.2.orig/qdbm.scm
++++ Gauche-qdbm-0.2/qdbm.scm
+@@ -72,7 +72,7 @@
+ (unless (slot-bound? self 'path)
+ (error "path must be set to open qdbm database"))
+ (when (qdbm-file-of self)
+- (errorf "qdbm ~S already opened" qdbm))
++ (errorf "qdbm ~s already opened" (qdbm-file-of self)))
+ (let* ((path (slot-ref self 'path))
+ (rwmode (slot-ref self 'rw-mode))
+ (omode (case rwmode