[今天生日]造了个编译到 JavaScript 的语言取名叫做 Smooth

# 异步的 delay 函数
delay = `(ms)=>(f)=>setTimeout(()=>f(ms),ms)`

# 将一个普通的函数封装成异步函数
mkasync = `(job)=>(f)=>{job();f()}`

# 将多个异步函数串联到一起
async f g = f g

# 以同步的方式写异步，每隔一秒依次输出 "hello" "world" "smooth"
asyncJob = with async do
     delay 1000
     mkasync \_-> print $ "hello"
     delay 2000
     mkasync \_-> print "world"  
     n <- delay 3000 # 还可以取得异步函数的数据
     mkasync \_-> print $ "smooth " + n 
     
main _ = asyncJob \_ -> print "done"

可以自定义运算符

# 定义 `+` 符号
infixl 4 + add
add = `(x)=>(y)=>x+y`

# 定义 `<` 符号
infixl 6 < lt
lt = `(x)=>(y)=>x<y`

# 定义 `$` 符号，用来消除括号
infixr 0 $ app
app f x = f x

函数式和指令式混用

# 定义 `+` 符号
infixl 4 + add
add = `(x)=>(y)=>x+y`

# 定义 `<` 符号
infixl 6 < lt
lt = `(x)=>(y)=>x<y`

impFunc n =
    let result = 0
    let i = 0
    while i < n
    	result = result + i
        i = i + 1
    	
decFunc n = if n < 0 then 0 else n + decFunc n

异步

delay

函数

mkasync

72 条回复 • 2016-05-26 12:06:36 +08:00

southwolf

2016 年 5 月 24 日

生日快乐！

bramblex

2016 年 5 月 24 日

@southwolf 谢谢 /w\

Slienc7

2016 年 5 月 24 日

🎉生日快乐🎉

lichun

2016 年 5 月 24 日

happy birthday

shyling

2016 年 5 月 24 日 via iPad

`我不是 js`

bramblex

2016 年 5 月 24 日

@shyling

主要方便和 js 之间互操作 /w\

bramblex

2016 年 5 月 24 日

@Slienc7
@lichun

谢谢～ OwO ～

ctsed

2016 年 5 月 24 日 via iPhone

明年就可以一起过生日了

mactaew

2016 年 5 月 24 日 via iPhone

黑皮波斯忒

zzNucker

2016 年 5 月 25 日

迟到的生快~！

aprikyblue

2016 年 5 月 25 日 via Android

快生

upczww

2016 年 5 月 25 日 via Smartisan T1

膜拜大神，生日快乐，好像晚了

justjavac

2016 年 5 月 25 日 via Android

生日快乐\^O^/

4679kun

2016 年 5 月 25 日 via Android

迟到的生快(=ﾟωﾟ)=

msg7086

2016 年 5 月 25 日

这位姐姐生快～

hewigovens

2016 年 5 月 25 日

github 上的 readme 发现一处错别字，“其本质就是一个简单的 CPS 变幻” 应为 “变换”？

xiamx

2016 年 5 月 25 日

生日快乐！

linux40

2016 年 5 月 25 日 via Android

完成之后马上弃坑么。。。

bramblex

2016 年 5 月 25 日 via Android

@hewigovens 对… cps 变换，输入法的锅

bramblex

2016 年 5 月 25 日 via Android

@linux40 不准备弃坑…我是准备拿这东西实用的…模块系统和类型系统还没加上去

bramblex

2016 年 5 月 25 日 via Android

@zzNucker
@aprikyblue
@justjavac
@mactaew

bramblex

2016 年 5 月 25 日

@aprikyblue
@upczww
@justjavac
@4679kun
@msg7086

上一条手误了，谢谢大家～

xcodebuild

2016 年 5 月 25 日 via Android

生日快乐🎉🎉

chunqiuyiyu

2016 年 5 月 25 日

虽然看不懂，但是并不妨碍我说一句“生日快乐”

iphantom

2016 年 5 月 25 日

生快

yuankui

2016 年 5 月 25 日

需要哪些准备才能造一门语言？

silvernoo

2016 年 5 月 25 日

生快

w466397352

2016 年 5 月 25 日

生日快乐\^O^/
虽然我也看不懂

scarlex

2016 年 5 月 25 日

生日快乐 ~

baocaixiong

2016 年 5 月 25 日

生日快乐

pyufftj

2016 年 5 月 25 日

@yuankui 编译原理看一下

bramblex

2016 年 5 月 25 日

@codefalling

赶紧抱紧大腿，膜拜之～

bramblex

2016 年 5 月 25 日

@chunqiuyiyu
@iphantom
@w466397352
@scarlex
@baocaixiong

谢谢大家～ OwO

guizer

2016 年 5 月 25 日

生快代码什么的看不懂...

bramblex

2016 年 5 月 25 日

@pyufftj
@yuankui

我在造第一个版本，也就是 Smooth 的前身 BlxScript 的时候还没有看过编译原理……

其实很多东西并没有想象得那么复杂，我建议是不看书，先用自己的方式尝试实现，等实现完了再去看书看理论。如果一开始就看书，可以说你完全不知道书里讲得啥；明白书里讲啥了还是不明白为啥要真么做；明白为啥这么做了又不知道这东西该用在那里；明白该用在那里了又不知道该怎么用……而先自己尝试用自己的想法去实现一个模型，再回去翻书，上面的一系列坑就都没有了。