Repeat a string: Difference between revisions

Content added Content deleted

Inline

@@ Line 40: / Line 40: @@
          AR     R2,R6              @b+=l
          BCT    R8,LOOP            loop i times
-         LM     R2,R8,REPEATSA     restore registers
+RET      LM     R2,R8,REPEATSA     restore registers
-RET      BR     R14                return
+         BR     R14                return
 PARMLST  DC     A(PG,CX,II)        parmlist
 REPEATSA DS     7F                 local savearea
@@ Line 57: / Line 57: @@
 abc abc abc abc abc abc
 </pre>
 =={{header|4DOS Batch}}==