summaryrefslogtreecommitdiff
path: root/stdlib
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib')
-rw-r--r--stdlib/gc.ml1
-rw-r--r--stdlib/gc.mli3
2 files changed, 4 insertions, 0 deletions
diff --git a/stdlib/gc.ml b/stdlib/gc.ml
index db98de9783..6482ebb78b 100644
--- a/stdlib/gc.ml
+++ b/stdlib/gc.ml
@@ -29,6 +29,7 @@ type stat = {
fragments : int;
compactions : int;
top_heap_words : int;
+ stack_size : int;
};;
type control = {
diff --git a/stdlib/gc.mli b/stdlib/gc.mli
index 809998c500..76fb937e4d 100644
--- a/stdlib/gc.mli
+++ b/stdlib/gc.mli
@@ -70,6 +70,9 @@ type stat =
top_heap_words : int;
(** Maximum size reached by the major heap, in words. *)
+
+ stack_size: int;
+ (** Current size of the stack, in words. *)
}
(** The memory management counters are returned in a [stat] record.