在方案中将字节字符串转换为Int

Question

我有这样的代码将十六进制转换成字节字符串。

(define (word->bin s)
  (let ((n (string->number s)))
    (bytes (bitwise-and (arithmetic-shift n -24) #xFF)
    (bitwise-and (arithmetic-shift n -16) #xFF)
    (bitwise-and (arithmetic-shift n -8) #xFF)
    (bitwise-and n #xFF))))
(word->bin "#x10000002")

我正在考虑一个类似的函数，将二进制转换为整数，然后打印它。最终的结果是二进制转换为十六进制。一些有用的链接：11.2.1

字节-~3 3estring/utf-8)

Answer 1

我不确定这是否是您想要的，或者即使您使用的是PLT，但是如果您使用了，那么您应该看看PLT中的integer-bytes->integer和integer->integer-bytes函数。请注意，这些创建具有二进制内容的字节字符串--因此它可能不同于您在这里所做的工作。

(如果您使用的是372版本，那么您应该进行真正的升级。)