bson-encode for bson-binary objects has infinite recursion

[mbancroft]

I believe you want to call bson-encode on the contents of the blob, like so:

(bson-encode key (data value) :array array :type type :encoder #'encode-value)

[fons]

thanks for this.. I'll fix over the weekend !!

[fons]

(get-element "hello" (bson-decode 23 0 1 (bson-encode "hello" (bson-binary +bson-binary-generic+ (string-to-octets "123abc"))))) seems to be working !