[今天生日]造了个编译到 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-05-24 23:09:09 +08:00

生日快乐！

bramblex

2016-05-24 23:10:30 +08:00

@southwolf 谢谢 /w\

Slienc7

2016-05-24 23:18:54 +08:00

🎉生日快乐🎉

lichun

2016-05-24 23:24:47 +08:00

happy birthday

shyling

2016-05-24 23:28:35 +08:00 via iPad

`我不是 js`

bramblex

2016-05-24 23:33:44 +08:00

@shyling

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

bramblex

2016-05-24 23:34:09 +08:00

@Slienc7
@lichun

谢谢～ OwO ～

ctsed

2016-05-24 23:46:59 +08:00 via iPhone

明年就可以一起过生日了

mactaew

2016-05-24 23:50:04 +08:00 via iPhone

黑皮波斯忒

zzNucker

2016-05-25 00:10:25 +08:00

迟到的生快~！

aprikyblue

2016-05-25 00:26:50 +08:00 via Android

快生

upczww

2016-05-25 00:29:36 +08:00 via Smartisan T1

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

justjavac

2016-05-25 00:52:17 +08:00 via Android

生日快乐\^O^/

4679kun

2016-05-25 00:55:07 +08:00 via Android

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

msg7086

2016-05-25 01:25:41 +08:00

这位姐姐生快～

hewigovens

2016-05-25 07:20:13 +08:00

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

xiamx

2016-05-25 07:26:24 +08:00

生日快乐！

linux40

2016-05-25 07:52:22 +08:00 via Android

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

bramblex

2016-05-25 08:22:50 +08:00 via Android

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

bramblex

2016-05-25 08:23:56 +08:00 via Android

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

bramblex

2016-05-25 08:28:09 +08:00 via Android

@zzNucker
@aprikyblue
@justjavac
@mactaew

bramblex

2016-05-25 08:29:30 +08:00

@aprikyblue
@upczww
@justjavac
@4679kun
@msg7086

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

xcodebuild

2016-05-25 08:37:41 +08:00 via Android

生日快乐🎉🎉

chunqiuyiyu

2016-05-25 09:10:03 +08:00

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

iphantom

2016-05-25 09:12:35 +08:00

生快

yuankui

2016-05-25 09:16:55 +08:00

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

silvernoo

2016-05-25 09:19:40 +08:00

生快

w466397352

2016-05-25 09:34:38 +08:00

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

scarlex

2016-05-25 09:38:49 +08:00

生日快乐 ~

baocaixiong

2016-05-25 09:51:39 +08:00

生日快乐

pyufftj

2016-05-25 10:40:39 +08:00

@yuankui 编译原理看一下

bramblex

2016-05-25 11:15:52 +08:00

@codefalling

赶紧抱紧大腿，膜拜之～

bramblex

2016-05-25 11:16:31 +08:00

@chunqiuyiyu
@iphantom
@w466397352
@scarlex
@baocaixiong

谢谢大家～ OwO

guizer

2016-05-25 11:21:14 +08:00

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

bramblex

2016-05-25 11:22:18 +08:00

@pyufftj
@yuankui

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

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