Create call1cc.lua

coro & call/1cc by lua