diff --git a/3rd/lua/lstring.c b/3rd/lua/lstring.c
index a9ff3e15..893ed8a8 100644
--- a/3rd/lua/lstring.c
+++ b/3rd/lua/lstring.c
@@ -65,7 +65,7 @@ int luaS_eqshrstr (TString *a, TString *b) {
 
 void luaS_share (TString *ts) {
   makeshared(ts);
-  ts->id = ATOM_INC(&STRID);
+  ts->id = ATOM_DEC(&STRID);
 }
 
 unsigned int luaS_hash (const char *str, size_t l, unsigned int seed) {