fold

用户名:fold

注册于:2018-02-10

主题数: 1     回贴数: 12

网站:

介绍:

最后活动于26 天前
回复了主题  › 切分字符串的方法

(define (split8 s c)
  (define len (string-length s))
  (define-syntax split-from-expansion
    (lambda (stx)
      (syntax-case stx ()
        [(_ () from-loc) #'(split-from from-loc)]
        [(_ (t r ...) from-loc)
         #`(let loop ([end-loc from-loc])
     

«  26 天前
回复了主题  › 切分字符串的方法

回复#28 @xaengceilbiths :

ta6nt

«  26 天前
回复了主题  › 切分字符串的方法

回复#24 @xaengceilbiths :

你的多线程版本在我的机器(intel i7 8700k)上效率并不理想。

«  26 天前
回复了主题  › 正则表达匹配

SRFI里面的功能能不能用取决于某个实现有没有支持

«  2018-04-23
回复了主题  › Scheme debug方法

这个时候就体现出racket的macro stepper的好用了。。。

«  2018-04-18
回复了主题  › 要不要每年搞个Scheme Conf

回复#2 @chui :

你觉得什么算是有影响力的人或组织呢?


«  2018-04-06
创建了主题  › 要不要每年搞个Scheme Conf

这样大家都能聚一聚。。。。

«  2018-04-05
回复了主题  › 切分字符串的方法

(define (split2 s c)   (letrec ((walk (lambda (begin end)                    (cond ((= begin end)  (values 0 '()))                          ((char=? (string-ref s begin) c) (let-values (((a b) (walk (+ begin 1) end)))                         
«  2018-04-01
回复了主题  › 切分字符串的方法

这个split比起上面的更加高效。

(define (split s c)   (letrec ((walk (lambda (str)                    (cond ((string=? str "")  (values "" '()))                          ((char=? (string-ref str 0) c) (let-values (((a b) (walk (substring str 1))))                 
«  2018-03-31
回复了主题  › 万元(USD)奖金征召LISP黑客

支持~~

«  2018-03-24
回复了主题  › 如何获取shell命令的输出?

你需要设置current-output-port

«  2018-03-10
回复了主题  › 建一个微信群

回复#2 @dou4cc :

这个群水笔太多

«  2018-02-25
回复了主题  › theSchemer 基金会征求筹建建议和讨论

敢问大约能凑齐多少资金。

«  2018-02-12
登 录
信息栏

Scheme中文社区

推荐实现 ChezScheme / r6rs / r7rs large
theschemer.org
Q群: 724577239

精华导览

社区项目

包管理器:Raven
HTTP服务器:Igropyr (希腊火)
官方插件:vscode-chez

社区目标:

完善足以使Scheme工程化和商业化的库,特别是开发极致速度的Web服务器和ANN模块。

一直以来Scheme缺少一个活跃的中文社区,同时中文资料的稀少,导致大多数因为黑客与画家和SICP而接触Scheme的朋友,在学完SICP后无事可做,不能将Scheme转换为实际的生产力。最后渐渐的放弃。
同时Chicken等实现,却因效率问题无法与其他语言竞争。本社区只有一个目的,传播Scheme的文明之火,在最快的编译器实现上,集众人之力发展出足够与其他语言竞争的社区和库。


友情链接:

Clojure 中文论坛
函数式·China