Longest common substring: Difference between revisions

m
→‎{{header|REXX}}: changed a comment.
(→‎{{header|REXX}}: added the REXX language. -- ~~~~)
m (→‎{{header|REXX}}: changed a comment.)
Line 125:
 
=={{header|REXX}}==
<lang rexx>/*REXX program to testtests the LCSUBLCSUBSTR (Longest Common Substring) subroutine.*/
parse arg a b . /*get two arguments (strings). */
if a=='' then a= "thisisatest" /*use this string for a default. */
Line 131:
say ' string A =' a /*echo string A to screen. */
say ' string B =' b /*echo string B to screen. */
say ' LCsubstr =' lcsubstrLCsubstr(a,b) /*tell Longest Common Substring. */
exit /*stick a fork in it, we're done.*/
/*──────────────────────────────────LCSUBSTR subroutine─────────────────*/