这两天完善了我的jaskell语言的一个shell。

这个shell虽然是jaskell的，但是也可以作为一个交互式执行java代码的解释器。对于想快速地试试某个api比较有用。

相比于eclipse scrapebook，它的好处是更方便，而且，jaskell的一些函数式的特性让你可以写出更加简洁的代码。

下面举几个例子：

轻松玩Swing

打开shell，它显示这样：
然后假设你要运行一下javax.swing.JOptionPane.showInputDialog()函数的话，你可以这样写：
回车两下（第一下，就是简单折行，因为你可以接着写下一行代码，只有连续两下折行，shell才认为你是要执行）
结果就会出现一个简单的swing对话框。在对话框里面输入年龄“13"，回车，
shell里面就会显示：13。


这里面，一点需要注意的，java方法调用不用圆括号，而是方括号。你可以把这个理解为一个reflection调用，传递的永远都是一个数组。

下面，假设你想重复地使用JOptionPane这个类，使用showInputDialog, showConfirmDialog这类的方法，总这么写javax.swing.JOptionPane也够麻烦的。我们可以简化它：
当你回车两次后，shell在"=>"提示符后面自动显示这个表达式的值："class javax.swing.JOptionPane"。

下面我们可以重复使用dialog变量了。在这之前，我们可能想看看JOptionPane到底都支持什么静态方法，我们可以用"?"来让shell告诉我们
这个"?"不是jaskell语言的一部分，而是shell的命令，所以不需要回车两次。回车，shell就会把JOptionPane的所有方法都列出来。

然后假设我们选择showMessageDialog，可以这样写：
然后，一个"hello world"的对话框就弹了出来（看不见？找一找。它可能被藏在你的当前窗口后面了。）

更简化一点，假设我要重复showMessageDialog若干遍，我可以这样写：
这个表达式的值是一个接受一个参数的，叫做say的函数。

下面你可以say很多东西啦：
等等等等。



傻瓜多线程

好，看过了JOptionPane，我们来看看多线程。下面是用这个语言怎么启动一个线程：
这里面Thread.new大概不需要解释。这里对构造函数的调用是Ruby风格的ClassName.new，而不是java的new ClassName。

构造函数也需要用一个list来传递参数。我们这里传递的是一个Runnable对象。
用来实现Runnable接口的是一个匿名函数，这个函数不管参数是什么，一旦调用，就println一下。

implements 是一个函数，它负责用一个函数来动态生成一个实现某接口的proxy出来。它前面的那个反向单引号表示把一个函数以中缀语法调用，所以 (somefunction `implements Runnable)等价于implements(somefunction, Runnable)。

"\"符号是lamda函数表示法。"->"符号前面的是函数参数，后面的是函数体。这里因为我们不使用这个参数，所以用"_"这个通配符。

最后，我们调用start[]方法来执行这个线程。


我们还可以用标准的"const"函数来让代码更简短一点。"const x"语义上完全等价于"\_->x"。另外，我们也可以用java风格的new操作符函数来写，jaskell对两者都支持的：


然后，考虑到重用，我们可以这样，先把System.out.println搞短一点，每次敲这么长太麻烦：

（实际上，println函数是系统已经缺省就定义好的了。你完全没有必要自己定义println就可以直接用了。这里只是演示一下怎么自己定义函数）


然后，把那段启动线程的代码写成函数：

好了，下面我们可以任意启动线程做事情了：

最后一个say "nice!"，如果不用单独线程的话，运行后这个对话框将阻塞当前线程。现在用run来运行它，就不会阻塞了。


今天你fp了吗？

最后再随便看看jaskell作为函数式语言的本分所能做的一些事。

foreach函数：

这个函数把1,2,"hello"三个都打印一遍。

这个函数把数字1到100按顺序打印一遍。

map函数：
这个函数把一个字符串列表转换成一个整数列表。


filter函数：

这个代码把1到100中所有小于10的整数都取出来。

filter函数的第一个参数是一个函数，这个函数对列表中的每一个元素都进行判断，返回true或者false。

find函数：

这个代码在列表中寻找整数2，如果找到，返回找到的位置（0为第一个）


lookup函数：

这个代码在列表中寻找第一个符合x*x>x+50的元素，找到就返回位置。

@函数：

上面我们知道找到的数字是在位置7，可以用@来得到位置7的值：

好，这个数是8。


sum函数：


注意，最难的来了！
fold函数：

这个fold函数以1为初始值，然后对每个列表元素，把它和当前值做乘法，用结果更新当前值，最后把计算结果返回。所以这段代码实际上做的就是把从1到5乘起来。
(*)是一个乘法函数。

你也可以用自己写的：
一样的。


行了，差不多了。下载在：

http://dist.codehaus.org/yan/distributions/jaskell.zip

把jar文件都放到你的classpath里面，然后运行jfun.jaskell.shell.Shell类就行了。