- (assert (= integer (base64-string-to-integer
- (integer-to-base64-string integer :columns columns))))
- (assert (string= (base64-string-to-string
+ (assert (= integer
+ (base64-string-to-integer
+ (integer-to-base64-string integer :columns columns))))
+ (assert (string= string
+ (base64-string-to-string