anchor.diff:          helper ()
       
   
  -    let attachAndReplace self (msg : IokeObject) =
  +    let attachAndReplace self msg =
           attach self msg
           self.level <- Attach
           self.message <- msg
   
  -    let attachToTopAndPush (msg : IokeObject) precedence =
  +    let attachToTopAndPush msg precedence =
           let top = stack.[0]
           attachAndReplace top msg
   
  
positive.code:                 x
              | opTable -> opTable
  
      let getOpTable (opTable : IokeObject) (name : string) creator =
          let create_new () =
              let result = creator runtime
              opTable.SetCell(name, runtime.NewDict(result))
  
negative.code: 
      let CurrentLevel () = stack.[0]
  
      let popDownTo targetLevel expressions =
          let rec helper () =
              match stack with
                  | []  -> ()
  