From 59dfd8f21ca1a5c793a89b6af87a28df5a78a3d3 Mon Sep 17 00:00:00 2001
From: Hans Hagen <pragma@wxs.nl>
Date: Tue, 24 Aug 2021 22:54:31 +0200
Subject: 2021-08-24 22:16:00

---
 metapost/context/base/mpxl/mp-mlib.mpxl | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'metapost')

diff --git a/metapost/context/base/mpxl/mp-mlib.mpxl b/metapost/context/base/mpxl/mp-mlib.mpxl
index 65146081e..f29ba9c44 100644
--- a/metapost/context/base/mpxl/mp-mlib.mpxl
+++ b/metapost/context/base/mpxl/mp-mlib.mpxl
@@ -1850,3 +1850,10 @@ permanent uniquelist ;
 def withtolerance expr n =
     withprescript ("tolerance=" & decimal n)
 enddef ;
+
+% fun stuff: randomseed := repeatablerandom("default") ;
+
+newscriptindex mfid_repeatablerandom ; mfid_repeatablerandom := scriptindex("repeatablerandom") ;
+
+def repeatablerandom = runscript mfid_repeatablerandom enddef ;
+
-- 
cgit v1.2.3