limu 最近的时间轴更新 limu 最近的时间轴更新 | limuV2EX 第 16537 号会员，加入于 2012-02-09 13:28:53 +08:00 |
| 在 Github 上弄了一个 blog, 写写 Haskell Haskell limu 2016-07-31 10:01:48 AM 最后回复来自 luckypoem | 12 |
| 生活所迫 出书第1季 （主要是计算机码农类的,北京） 二手交易 limu 2012-08-21 10:29:05 AM 最后回复来自 qiayue | 17 |
limu 最近回复了
194 天前 回复了 qicaisedeyun 创建的主题 问与答 一加手机问题，有会设置的吗？ |
设置 > 辅助功能 > 无障碍 > 通用 > 便捷功能 > 按电源键结束通话
2017-08-10 10:30:55 +08:00 回复了 ty321ty 创建的主题 macOS mac 现在还登录着 但是忘记了开机密码 不敢关机了 求救啊! |
还给失主吧。
2014-12-31 17:56:38 +08:00 回复了 y051313 创建的主题 分享发现 分享一个美亚直邮的免运费码 |
2013-04-03 13:05:36 +08:00 回复了 hzlzh 创建的主题 程序员 [一道有趣的算法题] 各种语言都来试试吧～ |
2013-03-03 21:45:07 +08:00 回复了 limu 创建的主题 Haskell 在 Github 上弄了一个 blog, 写写 Haskell |
2013-03-03 19:34:44 +08:00 回复了 jiyinyiyong 创建的主题 程序员 有没有同学来讲解下王垠的代码的... |
他自己以前说过:自动的CPS变换. 用伪C代码解释一个:
比如, 变换前的:
int sum(int* arr, int len){
if(len <= 0) return 0; else return arr[0] + sum(arr+1, len-1);
}
调用: print(sum([1,2,3,4], 4)) //输出 10;
变换后的:
void sum_cps(int sum, int* arr, int len, void (callback*)(int)){
if(len <= 0) callback(sum);
else sum_cps(sum + arr[0], arr+1, len-1, callback);
}
调用:(sum_cps, 0, [1,2,3,4], 4, print);
这样变换以后, 自动变成尾递归. sum 每次递归调用需要把arr[0] 压栈, len大时会堆栈溢出, 而sum_cps,需要的栈为0, 不会堆栈溢出.
递归调用是FP的根本, 所以自动实现这种变换意义很大.
比如, 变换前的:
int sum(int* arr, int len){
if(len <= 0) return 0; else return arr[0] + sum(arr+1, len-1);
}
调用: print(sum([1,2,3,4], 4)) //输出 10;
变换后的:
void sum_cps(int sum, int* arr, int len, void (callback*)(int)){
if(len <= 0) callback(sum);
else sum_cps(sum + arr[0], arr+1, len-1, callback);
}
调用:(sum_cps, 0, [1,2,3,4], 4, print);
这样变换以后, 自动变成尾递归. sum 每次递归调用需要把arr[0] 压栈, len大时会堆栈溢出, 而sum_cps,需要的栈为0, 不会堆栈溢出.
递归调用是FP的根本, 所以自动实现这种变换意义很大.
2013-02-21 16:29:25 +08:00 回复了 sytao 创建的主题 问与答 求名~打算把草莓放到淘宝上去。想取一个好记点的名字，绿色为主。 |
倒莓孩子
Select Language