add coroutine copy module

Author: leafo

lapis-dev-1.rockspec

@@ -63,6 +63,7 @@ build = {
     ["lapis.cmd.templates.tupfile"] = "lapis/cmd/templates/tupfile.lua",
     ["lapis.cmd.util"] = "lapis/cmd/util.lua",
     ["lapis.config"] = "lapis/config.lua",
+    ["lapis.coroutine"] = "lapis/coroutine.lua",
     ["lapis.cqueues"] = "lapis/cqueues.lua",
     ["lapis.csrf"] = "lapis/csrf.lua",
     ["lapis.db"] = "lapis/db.lua",

lapis/application.lua

@@ -1,5 +1,6 @@
 local logger = require("lapis.logging")
 local lapis_config = require("lapis.config")
+local coroutine = require("lapis.coroutine")
 local Router
 Router = require("lapis.router").Router
 local insert

lapis/application.moon

@@ -2,6 +2,8 @@
 logger = require "lapis.logging"
 lapis_config = require "lapis.config"
 
+coroutine = require "lapis.coroutine"
+
 import Router from require "lapis.router"
 
 import insert from table

lapis/application/route_group.lua

@@ -118,6 +118,7 @@ each_route = function(obj, scan_metatable, callback)
     end
   end
 end
+local coroutine = require("lapis.coroutine")
 local each_route_iter
 each_route_iter = function(obj, scan_metatable)
   return coroutine.wrap(function()

lapis/application/route_group.moon

@@ -139,6 +139,7 @@ each_route = (obj, scan_metatable=false, callback) ->
     if obj_mt and type(obj_mt.__index) == "table"
       each_route obj_mt.__index, scan_metatable, callback
 
+coroutine = require "lapis.coroutine"
 each_route_iter = (obj, scan_metatable) ->
   coroutine.wrap ->
     each_route obj, scan_metatable, coroutine.yield

lapis/coroutine.lua

@@ -0,0 +1,5 @@
+local _tbl_0 = { }
+for k, v in pairs(coroutine) do
+  _tbl_0[k] = v
+end
+return _tbl_0

lapis/coroutine.moon

@@ -0,0 +1,3 @@
+-- this is a copy of the coroutine module that lapis will use so that calling
+-- code can manipulate how coroutines are handled
+{k, v for k,v in pairs coroutine}

lapis/validate.lua

@@ -1,6 +1,7 @@
 local insert
 insert = table.insert
 local unpack = unpack or table.unpack
+local coroutine = require("lapis.coroutine")
 local validate_functions = {
   exists = function(input)
     return input and input ~= "", "%s must be provided"

lapis/validate.moon

@@ -6,6 +6,8 @@ import insert from table
 
 unpack = unpack or table.unpack
 
+coroutine = require "lapis.coroutine"
+
 validate_functions = {
   exists: (input) ->
     input and input != "", "%s must be provided"

lapis/validate/types.lua

@@ -7,6 +7,7 @@ local instance_of
 instance_of = require("tableshape.moonscript").instance_of
 local yield_error
 yield_error = require("lapis.application").yield_error
+local coroutine = require("lapis.coroutine")
 local unpack = unpack or table.unpack
 local indent
 indent = function(str)