球拍：得到包校验和

Question

我想在不使用raco pkg show -l <PKG-NAME>的情况下获取已安装软件包的校验和。类似的东西：

(define scribble-checksum (get-checksum "scribble"))

Answer 1

使用pkg/lib API：

#lang racket/base

(require racket/format pkg/lib)

(define (get-checksum str)
  (define tbl (installed-pkg-table #:scope 'installation))
  (define info (hash-ref tbl str))
  (define chk (pkg-info-checksum info))
  (~a chk #:max-width 8))

然后你可以做以下事情：

(get-checksum "typed-racket")
;; Returns: "f53314a2" for me, today