value evt:一个Racket库可让您将任何值转换为可同步事件 源码

价值评估 将任意值包装到可同步事件中。 事件的同步结果是原始值,但有两个例外:过程同步到其返回值,列表递归同步。 这两个值都可以通过关键字禁用。 请参阅文档以获取最新信息,因为此自述文件可能会落后。 最初创建时: ; value-evts are both evt? and value-evt?. They sync to their argument > (define e (value-evt 9)) > e # > (evt? e) #t > (value-evt? e) #t > (sync e) 9 ; ; By default, syncing on a procedure syncs to the return value > (define proc (lambda () (+ 2 2))) > (sync (value-evt proc)) 4