Início / coding / Perguntas / 79062675
Accepted
Scooter
Asked: 2024-10-07 23:51:02 +0800 CST

O GNU Guile não tem a função vector->string?

  • 772

De acordo com o scheme.org Implementations GNU Guile suporta as versões R6 e R7 do Scheme. E o executável guile tem argumentos de linha de comando de "--r6rs" e "--r7rs". E o site Guile diz

Como o R7RS é um padrão muito menos ambicioso que o R6RS (veja Guile e Scheme), é muito fácil para o Guile dar suporte. Como tal, o Guile é uma implementação totalmente conforme do R7RS, com exceção de um bug ocasional e alguns recursos não implementados :

  • O R7RS especifica uma sintaxe para ler estruturas de dados circulares usando rótulos de dados, como #0=(1 2 3 . #0#). O leitor de Guile não suporta essa sintaxe atualmente; https://bugs.gnu.org/38236 .
  • Assim como no R6RS, vários recursos lexicais do R7RS entram em conflito com a sintaxe histórica do Guile. Além de r6rs-hex-escapes e hungry-eol-escapes (veja Incompatibilidades com o R6RS), o recurso de leitor r7rs-symbols precisa ser explicitamente habilitado.

E o Index em scheme.org mostra vector->string como parte do R7RS small . No entanto, quando executo o Guile com a opção --r7rs, ele não reconhece vector->string.

"Variável não vinculada: vetor->string"

O mesmo código funciona com o esquema MIT/GNU

(display (vector->string #(#\H #\i #\!)))  ; => "Hi!"
scheme

1 respostas

  1. Best Answer

    A ausência deles parece ser um descuido no suporte ao R7RS, sim. Considere registrar um relatório de bug sobre isso?

    Enquanto isso, aqui estão as versões de string->vectore vector->stringpara Guile.

    (use-modules (srfi srfi-43))

(define* (string->vector s #:optional (start 0) (end (string-length s)))
  (vector-unfold
   (lambda (i) (string-ref s (+ start i))) (- end start)))

(define* (vector->string v #:optional (start 0) (end (vector-length v)))
  (string-tabulate (lambda (i) (vector-ref v (+ start i))) (- end start)))
    • 1

relate perguntas