updated internal "for reach" primitive block with new arrow symbol. Sigh.

HISTORY.md

@@ -4,6 +4,7 @@
 
 ### 2019-01-21
 * let users make C-shape slots with loop arrow symbols. Sigh.
+* updated internal "for reach" primitive block with new arrow symbol. Sigh. 
 * updated Indonesian translation, thanks, Emmanuella Rumanti 
 
 ### 2019-01-19

snap.html

@@ -8,7 +8,7 @@
         <script type="text/javascript" src="src/widgets.js?version=2018-10-02"></script>
         <script type="text/javascript" src="src/blocks.js?version=2019-01-21"></script>
         <script type="text/javascript" src="src/threads.js?version=2019-01-12"></script>
-        <script type="text/javascript" src="src/objects.js?version=2019-01-14"></script>
+        <script type="text/javascript" src="src/objects.js?version=2019-01-21"></script>
         <script type="text/javascript" src="src/gui.js?version=2019-01-17"></script>
         <script type="text/javascript" src="src/paint.js?version=2018-10-02"></script>
         <script type="text/javascript" src="src/lists.js?version=2019-01-10"></script>

src/blocks.js

@@ -1474,6 +1474,13 @@ SyntaxElementMorph.prototype.labelPart = function (spec) {
             part.isStatic = true; // rejects reporter drops
             part.isLambda = true; // auto-reifies nested script
             break;
+        case '%cla':
+            part = new CSlotMorph();
+            part.isStatic = true; // rejects reporter drops
+            part.isLambda = true; // auto-reifies nested script
+            part.isLoop = true; // has a loop symbol
+            part.add(this.labelPart('%loopArrow'));
+            break;
         case '%loop':
             part = new CSlotMorph();
             part.isStatic = true;
@@ -2227,6 +2234,7 @@ SyntaxElementMorph.prototype.endLayout = function () {
     %ca     - C-shaped with loop arrow, for custom blocks
     %cs     - C-shaped, auto-reifying, accepts reporter drops
     %cl     - C-shaped, auto-reifying, rejects reporters
+    %cla    - C-shaped with loop arrows, auto-reifying, rejects reporters
     %clr    - interactive color slot
     %t      - inline variable reporter template
     %anyUE  - white rectangular type-in slot, unevaluated if replaced

src/objects.js

@@ -83,7 +83,7 @@ BlockEditorMorph, BlockDialogMorph, PrototypeHatBlockMorph, localize,
 TableMorph, TableFrameMorph, normalizeCanvas, BooleanSlotMorph, HandleMorph,
 AlignmentMorph, Process, XML_Element, VectorPaintEditorMorph*/
 
-modules.objects = '2019-January-14';
+modules.objects = '2019-January-21';
 
 var SpriteMorph;
 var StageMorph;
@@ -1139,7 +1139,7 @@ SpriteMorph.prototype.initBlocks = function () {
             dev: true,
             type: 'command',
             category: 'lists',
-            spec: 'for %upvar in %l %cl',
+            spec: 'for %upvar in %l %cla',
             defaults: [localize('each item')]
         },