Applied source code semantic modification.

Removed unusable function.

Author: ccw808

src/lapi.c

@@ -898,6 +898,7 @@ LUA_API int lua_load (lua_State *L, lua_Reader reader, void *data,
 }
 
 
+#ifdef WITH_STRING_DUMP
 LUA_API int lua_dump (lua_State *L, lua_Writer writer, void *data) {
   int status;
   TValue *o;
@@ -911,7 +912,7 @@ LUA_API int lua_dump (lua_State *L, lua_Writer writer, void *data) {
   lua_unlock(L);
   return status;
 }
-
+#endif
 
 LUA_API int  lua_status (lua_State *L) {
   return L->status;

src/ldump.c

@@ -14,6 +14,7 @@
 #include "lobject.h"
 #include "lstate.h"
 #include "lundump.h"
+#ifdef WITH_STRING_DUMP
 
 typedef struct {
  lua_State* L;
@@ -162,3 +163,5 @@ int luaU_dump (lua_State* L, const Proto* f, lua_Writer w, void* data, int strip
  DumpFunction(f,NULL,&D);
  return D.status;
 }
+
+#endif  //  WITH_STRING_DUMP

src/lstrlib.c

@@ -144,6 +144,7 @@ static int writer (lua_State *L, const void* b, size_t size, void* B) {
 }
 
 
+#ifdef WITH_STRING_DUMP
 static int str_dump (lua_State *L) {
   luaL_Buffer b;
   luaL_checktype(L, 1, LUA_TFUNCTION);
@@ -154,7 +155,7 @@ static int str_dump (lua_State *L) {
   luaL_pushresult(&b);
   return 1;
 }
-
+#endif
 
 
 /*
@@ -827,7 +828,9 @@ static int str_format (lua_State *L) {
 static const luaL_Reg strlib[] = {
   {"byte", str_byte},
   {"char", str_char},
+#ifdef WITH_STRING_DUMP
   {"dump", str_dump},
+#endif
   {"find", str_find},
   {"format", str_format},
   {"gfind", gfind_nodef},