Jump to content

Longest substrings without repeating characters: Difference between revisions

m
→‎{{header|REXX}}: matched an invocation to the procedure name.
m (→‎{{header|REXX}}: matched an invocation to the procedure name.)
Line 398:
x= /*X: the substring, less the 1st char*/
do k=j+1 to L; x= x || substr($, k, 1) /*search for the max length substrings.*/
if \okxOKx(x) then iterate j /*Are there an replications? Skip it. */
_= length(x); if _<maxL then iterate /*is length less then the current max? */
@._= @._ x; maxL= _ /*add this substring to the max list. */
Cookies help us deliver our services. By using our services, you agree to our use of cookies.