fixed evaluation order problem in sexp

skeam.go

@@ -120,14 +120,8 @@ func eval(v interface{}, env *environment) (interface{}, error) {
 			return nil, errors.New("illegal evaluation of empty sexp ()")
 		}
 
-		// get first element as symbol
+		// eval the first item
-		s, ok := t[0].(symbol)
+		v, err := eval(t[0], env)
-		if !ok {
-			return nil, errors.New("expected a symbol")
-		}
-
-		// resolve symbol
-		v, err := env.get(s)
 		if err != nil {
 			return nil, err
 		}
@@ -150,6 +144,7 @@ func eval(v interface{}, env *environment) (interface{}, error) {
 			}
 		}
 
+		// exec lambda if possible
 		if l, ok := v.(lambda); ok {
 			if len(t) > 1 {
 				return l.call(env, t[1:])
@@ -182,7 +177,7 @@ func evalall(c chan token, env *environment) {
 				}
 			}
 		default:
-			fmt.Println("error in eval: %v", err)
+			fmt.Printf("error in eval: %v\n", err)
 		}
 	}
 }