racket

3熱度

2回答

在Linux和球拍V5.3，下一個程序運行正常， #lang racket (let loop ([i 0]) (printf "~a\n" i) (sleep 0.01) (loop (add1 i))) 但最長可以打印約200這個後懸掛， #lang racket (require racket/gui) (let loop ([i 0])

5熱度

1回答

Python中是否存在像這樣的模式匹配函數？

我剛剛在Racket中發現pattern matching功能非常強大。 > (match '(1 2 3) [(list a b c) (list c b a)]) '(3 2 1) > (match '(1 2 3) [(list 1 a ...) a]) '(2 3) > (match '(1 2 3) [(list 1 a ..3) a] [_ 'els

1熱度

2回答

將哈希函數導入懶球拍

如何將哈希函數導入懶球拍？到目前爲止，我有以下幾點： #lang lazy (require (only-in racket/base hash hash-set)) ，我得到了以下錯誤： only-in: bad module path in: (only-in racket/base hash hash-set) 我要去哪裏錯了？什麼是正確的模塊路徑

1熱度

1回答

無法得到執行Y組合的工作

下面的代碼（also here）： #lang racket (define poorY ((lambda length (lambda (ls) (cond [(null? ls) 0] [else (add1 ((length length) (cdr ls)))]))) (lambda length (lambda

3熱度

1回答

球拍簡單的AE定義型

從書「編程語言：適用和解釋」第6頁我嘗試了第一個例子中DrRacket #lang typed/racket (define-type AE [num (n number?)] [add (lhs AE?) (rhs AE?)] [sub (lhs AE?) (rhs AE?)]) 代碼，但我得到的錯誤 aeinterpretter.rkt:5:2: define-type: une

2熱度

2回答

SICP練習1.37：我的迭代求解得到了正確的答案，但有錯誤的1.38

我的迭代解SICP 1.37是 (define (con-frac n d k) (define (iter i result) (if (= 1 i) result (iter (- i 1) (/ (n i) (+ (d i) result))))) (iter k (/ (n k) (d k)))) (con-frac (lambda

1熱度

2回答

mzlib/etc的身份是如何工作的？

在一個web program，有代碼片段如下： (require mzlib/etc) (define (h-handler base args) (do-h identity)) (define (do-h cont) [begin (printf "~e\n" cont) (web-read/k "First number" (lambd

1熱度

1回答

試圖瞭解爲什麼DrRacket突出顯示了一些我的cond子句

How to Design Programs第二版中的練習42解釋了DrRacket突出顯示了下面代碼中最後兩個cond子句，因爲測試用例不涵蓋所有可能的情況。 ; TrafficLight -> TrafficLight ; given state s, determine the next state of the traffic light (check-expect (traffic

4熱度

1回答

獲取對象的所有字段

球拍可以同時獲取對象的所有字段嗎？我想基本上將對象轉換爲哈希表，其中字段名稱作爲鍵和字段值作爲值。我找到了一個函數（field-names obj），但後來我不知道如何使用返回的字段名來獲取obj的值。該功能get-field可以用來獲取一個字段的值，但我不知道如何與值使用它： > (define x% (class object% (init-field x y) (super-new)))

1熱度

1回答

外部輸出vim的緩衝區之後命令完成

我目前使用gVim的在Windows 7 運行如下命令： :r! racket % 我能夠在大約一半所需的輸出成功讀取的時間。其餘時間，沒有任何東西被讀取。在shell執行結束並實際產生一些輸出之前，在輸出中讀取vim似乎是一個問題。任何想法？