From 55f277e77428d7423ae906a8e1f1324d35b07a7d Mon Sep 17 00:00:00 2001
From: Jakob Kaivo <jkk@ung.org>
Date: Fri, 4 Mar 2022 12:32:20 -0500
Subject: import Miranda 2.066 from upstream

---
 miralib/ex/makebug.m | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)
 create mode 100644 miralib/ex/makebug.m

(limited to 'miralib/ex/makebug.m')

diff --git a/miralib/ex/makebug.m b/miralib/ex/makebug.m
new file mode 100644
index 0000000..b32d4bb
--- /dev/null
+++ b/miralib/ex/makebug.m
@@ -0,0 +1,18 @@
+> makebug size = [Tofile "/tmp/big.m" (big_def size)]
+> big_def n = "big_list\n=[\n" ++ lay (rep n "  \"hello\",") ++ "  \"hello\"]\n"
+
+This tests garbage collection during compilation.  First turn on gc
+reports by saying
+	/gc
+
+To generate /tmp/big.m of chosen size say, e.g.
+	makebug 10000
+to get mira to compile the result say
+	/f /tmp/big
+Saying this repeatedly (or /f %) will force recompilations
+Or from the command line after quitting mira
+	rm /tmp/big.x   #to force recompilation
+	mira -make -gc /tmp/big
+
+If the heap becomes corrupted  you  will  see  strange  type  errors  or
+"impossible event" messages.  From Rick Morgan at Durham, May 1990.
-- 
cgit v1.2.1