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

Github 传送门：https://github.com/bramblex/Smooth

线上试用：http://bramblex.github.io/Smooth/

特点：

利用 do..with 语法糖轻松解决异步问题。

# 异步的 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