summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/luatexdir/luasocket/test/testsrvr.lua
diff options
context:
space:
mode:
Diffstat (limited to 'Build/source/texk/web2c/luatexdir/luasocket/test/testsrvr.lua')
-rw-r--r--Build/source/texk/web2c/luatexdir/luasocket/test/testsrvr.lua9
1 files changed, 7 insertions, 2 deletions
diff --git a/Build/source/texk/web2c/luatexdir/luasocket/test/testsrvr.lua b/Build/source/texk/web2c/luatexdir/luasocket/test/testsrvr.lua
index f1972c2273c..72b93abe66e 100644
--- a/Build/source/texk/web2c/luatexdir/luasocket/test/testsrvr.lua
+++ b/Build/source/texk/web2c/luatexdir/luasocket/test/testsrvr.lua
@@ -7,9 +7,14 @@ while 1 do
print("server: waiting for client connection...");
control = assert(server:accept());
while 1 do
- command = assert(control:receive());
+ command, emsg = control:receive();
+ if emsg == "closed" then
+ control:close()
+ break
+ end
+ assert(command, emsg)
assert(control:send(ack));
print(command);
- (loadstring(command))();
+ ((loadstring or load)(command))();
end
end