anchor.diff:      let instanceCall_ t callee memb args =
           let kind = makeStrConst memb |> Some |> InstanceCall
           Operation(Call(kind, argInfo (Some callee) args None), t, None)
  +
  +    let emitJs_ t macro args =
  +        let info = argInfo None args None
  +        Operation(Emit(macro, Some info), t, None)
   
       let add left right =
           Operation(BinaryOperation(BinaryPlus, left, right), left.Type, None)
  
positive.code:         | Operators.subtraction, [left; right] -> binOp BinaryMinus left right
          | Operators.multiply, [left; right] -> binOp BinaryMultiply left right
          | Operators.division, [left; right] ->
              let div = binOp BinaryDivide left right
              match argTypes with
              // Floor result of integer divisions (see #172)
              // Apparently ~~ is faster than Math.floor (see https://coderwall.com/p/9b6ksa/is-faster-than-math-floor)
              | Number Integer::_ -> unOp UnaryNotBitwise div |> unOp UnaryNotBitwise
              | _ -> div
          | Operators.modulus, [left; right] -> binOp BinaryModulus left right
          | Operators.leftShift, [left; right] -> binOp BinaryShiftLeft left right
          | Operators.rightShift, [left; right] ->
  
negative.code: 
  let toString (sourceType: Type) (args: Expr list) =
      match sourceType with
      | Char | String -> args.Head
      | Unit | Boolean | Array _ | Tuple _ | FunctionType _ | EnumType _ ->
          globalCall_ String "String" None args
      | Builtin (BclInt64 | BclUInt64) -> coreCall_ String "Long" "toString" args
      | Number Int16 -> coreCall_ String "Util" "int16ToString" args
      | Number Int32 -> coreCall_ String "Util" "int32ToString" args
      | Number _ -> instanceCall_ String args.Head "toString" args.Tail
      | _ -> coreCall_ String "Util" "toString" args
  
  let toFloat (sourceType: Type) targetType (args: Expr list) =
      match sourceType with
      | String -> coreCall_ (Number Float64) "Double" "parse" args
      | Builtin (BclInt64 | BclUInt64) ->
          coreCall_ (Number Float64) "Long" "toNumber" args
      | Builtin BclBigInt ->
  