tweaks to output, fix scope issue in pprint

playground/samples/Combinatory.newt

@@ -39,7 +39,6 @@ data Term : Ctx -> Type -> U where
   Lam : {Γ : Ctx} {σ τ : Type} -> Term (σ :: Γ) τ -> Term Γ (σ ~> τ)
   Var : {Γ : Ctx} {σ : Type} -> Ref σ Γ → Term Γ σ
 
--- FIXME, I wasn't getting an error when I had Nil shadowing Nil
 infixr 7 _:::_
 data Env : Ctx -> U where
   ENil : Env Nil

playground/samples/Tour.newt

@@ -54,7 +54,7 @@ plus (S n) m = S (plus n m)
 plus' : Nat -> Nat -> Nat
 plus' = \ n m => case n of
     Z => m
-    S n => S (plus n m)
+    S n => S (plus' n m)
 
 -- We can define operators, currently only infix
 -- and we allow unicode and letters in operators