From dd616d38f3dcb67b1c4f36472df1c4d3a95f12ef Mon Sep 17 00:00:00 2001
From: jmoenig <jens@moenig.org>
Date: Fri, 29 Jan 2021 16:27:35 +0100
Subject: [PATCH] added more relabelling options for "rotate"

---
 HISTORY.md     | 1 +
 src/objects.js | 5 +++--
 2 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/HISTORY.md b/HISTORY.md
index d1feba5c..5e006bd9 100755
--- a/HISTORY.md
+++ b/HISTORY.md
@@ -21,6 +21,7 @@
 * threads, objects: removed previous experimental "column" and "width" primitives again
 * lists, threads, objects refactored experimental "rotate" primitive
 * updated German translation
+* added more relabelling options for "rotate"
 
 ### 2021-01-27
 * threads: hyperized new experimental "column" primitive
diff --git a/src/objects.js b/src/objects.js
index 8733dfbd..265a8177 100644
--- a/src/objects.js
+++ b/src/objects.js
@@ -1716,8 +1716,9 @@ SpriteMorph.prototype.blockAlternatives = {
     doHideVar: ['doShowVar'],
 
     // lists
-    reportCDR: ['reportTableRotated'],
-    reportTableRotated: ['reportCDR'],
+    reportCDR: ['reportTableRotated', 'reportListLength'],
+    reportTableRotated: ['reportCDR', 'reportListLength'],
+    reportListLength: ['reportTableRotated', 'reportCDR'],
 
     // HOFs
     reportMap: ['reportKeep', 'reportFindFirst'],