gwkkwg/metabang-bind — pull request #7 by hyotang666 (2014-10-01 02:25:18+00:00)
Title: fix GNU CLISP own bug.

Probably CLISP lose uninterned symbol's value after LOAD.
So change GENSYM to GENTEMP.

CLISP's error message is below.

;; Dribble of # started on NIL.

#
[2]> (ql:quickload :metabang-bind)
To load "metabang-bind":
Load 1 ASDF system:
metabang-bind
; Loading "metabang-bind"

(:METABANG-BIND)
[3]> (bind:bind(((:plist a b)'(:a 1 :b 2)))(list a b))

*** - FUNCALL: undefined function #:BINDING-GENERATOR31636
The following restarts are available:
USE-VALUE :R1 Input a value to be used instead of (FDEFINITION '#:BINDING-GENERATOR31636).
RETRY :R2 Retry
STORE-VALUE :R3 Input a new value for (FDEFINITION '#:BINDING-GENERATOR31636).
ABORT :R4 Abort main loop

Break 1 [4]> (dribble)
2014-10-01 11:18:15
;; Dribble of # finished on NIL.