DrRacket使用技巧总结

引用其他文件的函数

假设test.scm想引用max-two.scm中的一个函数max-two，可以这样，

test.scm

#lang sicp

(#%require rackunit)
(#%require "max-two.scm")

(max-two 2 3 4)

max-two.scm

#lang sicp

;; 千万别忘了这一句
(#%provide (all-defined))

(define (max-two x y z)
  (define (min-three x y z)
    (cond ((>= x y) (if (>= y z) z y))
          (else (if (>= x z) z x))))
  (- (+ x y z) (min-three x y z)))

Window10安装sicp包

7.1版本ui界面安装pkg报错cadr: contract violation，可以使用命令行安装，命令如下：

raco pkg install --auto sicp

从Vim中运行scheme程序

可以做如下配置：

augroup scheme
    autocmd!
    " 加上<esc>可以避免弹出命令行必须按两次enter才能回到代码
    autocmd filetype scheme nnoremap <F9> :w<cr>:! racket %<cr><esc>
augroup end

这样直接按下F9就能运行了