haskellFn2 ::
  (FromLuaStack a, FromLuaStack b, ToHaskellFunction (Lua c)) =>
  GrLangState -> (a -> b -> ExceptT GrLang.Error LuaGrLang c) -> Lua ()
haskellFn2 globalState f = pushFunction (\x y -> runGrLang' globalState (f x y))
haskellFn2 ::
  (FromLuaStack a, FromLuaStack b, ToHaskellFunction (Lua c)) =>
  GrLangState -> (a -> b -> ExceptT GrLang.Error LuaGrLang c) -> Lua ()
haskellFn2 globalState f = pushFunction (\x y -> runGrLang' globalState (f x y))
haskellFn2 globalState f = pushFunction (\x y -> runGrLang' globalState (f x y))