anchor.diff:  
       let CurrentLevel () = stack.[0]
   
  -    let popDownTo (targetLevel : int) (expressions : IList<IokeObject>) =
  +    let popDownTo targetLevel (expressions : IList<IokeObject>) =
           let rec helper () =
               match stack with
                   | []  -> ()
  
positive.code:                             | _ -> -1
  
  
      let argCountForOp (messageName : string) (messageSymbol : IokeObject) (msg : IokeObject) =
          if trinaryOperatorTable.Contains(messageSymbol) then
              Number.GetValue(trinaryOperatorTable.[messageSymbol]).intValue()
          else
  
negative.code:             else
                  OtherOp
  
      let levelForOp (messageName : string) messageSymbol msg =
          match messageSymbol with
              | Operator(prec) -> prec
              | InvertedOperator(prec) -> prec
  