--- lua-5.1.3.orig/src/lobject.h	2008-05-15 09:24:32.000000000 +0200
+++ lua-5.1.3/src/lobject.h	2008-08-10 14:32:26.000000000 +0200
@@ -208,7 +208,7 @@
 
 
 #define getstr(ts)	cast(const char *, (ts) + 1)
-#define svalue(o)       getstr(tsvalue(o))
+#define svalue(o)       getstr(rawtsvalue(o))