aboutsummaryrefslogtreecommitdiff
path: root/ltests.c
diff options
context:
space:
mode:
Diffstat (limited to 'ltests.c')
-rw-r--r--ltests.c12
1 files changed, 7 insertions, 5 deletions
diff --git a/ltests.c b/ltests.c
index 93a84284..fc233c7f 100644
--- a/ltests.c
+++ b/ltests.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: ltests.c,v 2.216 2017/04/24 18:06:12 roberto Exp roberto $ 2** $Id: ltests.c,v 2.217 2017/05/04 13:32:01 roberto Exp $
3** Internal Module for Debugging of the Lua Implementation 3** Internal Module for Debugging of the Lua Implementation
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -734,10 +734,12 @@ static int gc_printobj (lua_State *L) {
734 734
735 735
736static int gc_state (lua_State *L) { 736static int gc_state (lua_State *L) {
737 static const char *statenames[] = {"propagate", "atomic", "sweepallgc", 737 static const char *statenames[] = {
738 "sweepfinobj", "sweeptobefnz", "sweepend", "pause", ""}; 738 "propagate", "atomic", "enteratomic", "sweepallgc", "sweepfinobj",
739 static const int states[] = {GCSpropagate, GCSenteratomic, GCSswpallgc, 739 "sweeptobefnz", "sweepend", "callfin", "pause", ""};
740 GCSswpfinobj, GCSswptobefnz, GCSswpend, GCSpause, -1}; 740 static const int states[] = {
741 GCSpropagate, GCSenteratomic, GCSatomic, GCSswpallgc, GCSswpfinobj,
742 GCSswptobefnz, GCSswpend, GCScallfin, GCSpause, -1};
741 int option = states[luaL_checkoption(L, 1, "", statenames)]; 743 int option = states[luaL_checkoption(L, 1, "", statenames)];
742 if (option == -1) { 744 if (option == -1) {
743 lua_pushstring(L, statenames[G(L)->gcstate]); 745 lua_pushstring(L, statenames[G(L)->gcstate]);