aboutsummaryrefslogtreecommitdiff
path: root/src/intercopycontext.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'src/intercopycontext.cpp')
-rw-r--r--src/intercopycontext.cpp5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/intercopycontext.cpp b/src/intercopycontext.cpp
index 8058838..044b197 100644
--- a/src/intercopycontext.cpp
+++ b/src/intercopycontext.cpp
@@ -31,6 +31,7 @@ THE SOFTWARE.
31#include "keeper.h" 31#include "keeper.h"
32#include "lane.h" 32#include "lane.h"
33#include "linda.h" 33#include "linda.h"
34#include "nameof.h"
34#include "universe.h" 35#include "universe.h"
35 36
36// ################################################################################################# 37// #################################################################################################
@@ -109,8 +110,8 @@ THE SOFTWARE.
109 // try to discover the name of the function we want to send 110 // try to discover the name of the function we want to send
110 kLaneNameRegKey.pushValue(L1); // L1: ... v ... lane_name 111 kLaneNameRegKey.pushValue(L1); // L1: ... v ... lane_name
111 char const* _from{ lua_tostring(L1, -1) }; 112 char const* _from{ lua_tostring(L1, -1) };
112 lua_pushcfunction(L1, luaG_nameof); // L1: ... v ... lane_name luaG_nameof 113 lua_pushcfunction(L1, LG_nameof); // L1: ... v ... lane_name LG_nameof
113 lua_pushvalue(L1, L1_i); // L1: ... v ... lane_name luaG_nameof t 114 lua_pushvalue(L1, L1_i); // L1: ... v ... lane_name LG_nameof t
114 lua_call(L1, 1, 2); // L1: ... v ... lane_name "type" "name"|nil 115 lua_call(L1, 1, 2); // L1: ... v ... lane_name "type" "name"|nil
115 char const* _typewhat{ (lua_type(L1, -2) == LUA_TSTRING) ? lua_tostring(L1, -2) : luaL_typename(L1, -2) }; 116 char const* _typewhat{ (lua_type(L1, -2) == LUA_TSTRING) ? lua_tostring(L1, -2) : luaL_typename(L1, -2) };
116 // second return value can be nil if the table was not found 117 // second return value can be nil if the table was not found