From 9d728af4a64d3d4afc2c6792ee010152b09a2837 Mon Sep 17 00:00:00 2001
From: James Roseborough <james.roseborough@luaj.org>
Date: Thu, 13 Dec 2007 01:43:21 +0000
Subject: [PATCH] Add simple loadstring test.

---
 src/test/res/baselib.lua | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/test/res/baselib.lua b/src/test/res/baselib.lua
index 9b704db7..80a75b17 100644
--- a/src/test/res/baselib.lua
+++ b/src/test/res/baselib.lua
@@ -38,6 +38,10 @@ for k,v in ipairs({[30]='30',[20]='20'}) do print('ipairs5',k,v)end
 -- load
 -- loadfile
 -- loadstring
+local lst = "print(3+4); return 8"
+local lss,lsv = pcall( loadstring, lst )
+print( 'loadstring("'..lst..'")', lss, id(lsv) )
+print(  'loadstring("'..lst..'")()', pcall( lsv ) ) 
 
 -- pairs
 print( 'pcall(pairs)', pcall(pairs) )