         return x
     }
 
-    func deferFlow() throws -> DeferFlow {
+    private func deferFlow() throws -> DeferFlow {
         let x = DeferFlow()
         x.block = try proceduresBlock()
         return x
     }
 
-    func patternMatchClause() throws -> [PatternMatching] {
+    private func patternMatchClause() throws -> [PatternMatching] {
         var ps: [PatternMatching] = []
         switch ts.look().kind {
         case .RightBrace, .Else:

        }
    }

    func optionalBindingBody(wrap: Pattern -> Pattern) throws -> [PatternMatching] {
        var pms: [PatternMatching] = []
        repeat {
            let pm = PatternMatching()

        return x
    }

    private func forIni() throws -> ForInit? {
        switch ts.look().kind {
        case .Semicolon:
            return nil
