racket 宏使用示例代码

代码语言:racket

所属分类:其他

代码描述:racket 宏使用示例代码

代码标签: 示例

下面为部分代码预览,完整代码请点击下载或在bfwstudio webide中打开

#lang racket
(define-syntax-rule (while condition body ...)
 
(let loop ()
   
(when condition
      body
...
     
(loop))))

(let ([i 0])
 
(while (< i  10)
   
(displayln i)
   
(set! i (add1 i))))

;; Macros are hygienic, you cannot clobber existing variables!
(d.........完整代码请登录后点击上方下载按钮下载查看

网友评论0