1 files changed, 2 insertions, 0 deletions
diff --git a/library/init.tcl b/library/init.tcl
index d85fe2a..f1d6a64 100644
--- a/library/init.tcl
+++ b/library/init.tcl
@@ -823,6 +823,7 @@ proc tcl::CopyDirectory {action src dest} {
 }
 
 # TIP 131
+if 0 {
 proc tcl::rmmadwiw {} {
     set magic {
         42 83 fe f6 ff f8 f1 e5 c6 f9 eb fd ff fb f1 e5 cc f5 ec f5 e3 fd fe
@@ -847,3 +848,4 @@ proc tcl::mathfunc::rmmadwiw {} {
     set matter [lreverse $mind]
     return [join $matter ""]
 }
+}