parser: fix typo and fix example SPL programs

spl/facR.spl

@@ -3,7 +3,7 @@ Three ways to implement the factorial function in SPL.
 First the recursive version .
 */
 facR ( n ) :: Int -> Int {
-    if ( n = 2 ) {
+    if ( n < 2 ) {
         return 1;
     } else {
         return n * facR ( n - 1 );

spl/main.spl

@@ -3,7 +3,7 @@ main ( blah ) :: Void {
     var facN = 1 ;
     var ok = True;
     while ( n < 20 ) {
-        facN = facR ( n ;
+        facN = facR ( n );
         if ( facN != facI ( n ) || facN != facL ( n )) {
             print ( n : facN : facI ( n ) : facL ( n ) : [] ) ;
             ok = False ;

src/parser.rs

@@ -480,7 +480,7 @@ impl Parser {
         expect_token!("'{'", self.input, offset, Token::LeftBrace);
         let (body, mut offset) = try_parse!(self.parse_stmts(offset, Vec::new()));
         let &TokenAndSpan(_, Span { start: _, mut end }) =
-                expect_token!("'}'", self.input, offset, Token::LeftBrace);
+                expect_token!("'}'", self.input, offset, Token::RightBrace);
 
         let while_stmt = WhileStmt {
             cond: cond,