clairvy · February 18, 2010 10:40
diff --git a/.gitignore b/.gitignore
 *.class
diff --git a/AA.java b/AA.java
 public class AA {
    public int func(int x) {
        return x + 2;
    }
 }
diff --git a/Makefile b/Makefile
 do : build
 	scala test.scala
 	echo :l test.scala | scala

 build: AA.class

 AA.class : AA.java
 	javac $^

 clean :
 	$(RM) $(RMF) *.class

 test :
 	prove ./test.pl
diff --git a/test.pl b/test.pl
 #!/usr/bin/env perl

 use strict;
 use warnings;

 use Test::More tests => 2;

 my $expect = <<"EOL";
 12
 EOL

 is(`scala test.scala`, $expect);
 {
    my $ret = `echo :l test.scala | scala`;
    $ret =~ s/\A.*aa:[^\n]+[\n]+//ms;
    $ret =~ s/scala> //ms;
    chomp($ret);
    is($ret, $expect);
 }
diff --git a/test.scala b/test.scala
 val aa = new AA;
 println(aa.func(10))
No results found