2

私は GIMP の script-fu 以外の実装を使用したことはありません。また、GIMP のスキームもまったく初めてです。だから、多分私は間違っている。ただし、以下は Script-Fu コンソールでは機能しません。

(define x 13)
(define s 'x) ; or (define s `x)
,s => Error: eval: unbound variable: unquote 

同様に

(unquote s) => Error: eval: unbound variable: unquote 

「、」は機能する予定でしたが、unquoteは実装されていないようです。もしそうなら、どうすれば次の問題を解決できますか?

(define x 13)
(define y 7)
; define procedure to swap x and y
(define (swap) 
  (let ((t 0))
    (set! t ,'x)
    (set! x ,'y)
    (set! y t)
  )
)

これは複数回実行する必要があるため、(set! tx)...は機能しません。

4

1 に答える 1