Longest common substring: Difference between revisions
Content added Content deleted
m (→{{header|REXX}}: added a EXIT code.) |
|||
Line 2,073: | Line 2,073: | ||
say ' string B =' b /* " " B " " " " */ |
say ' string B =' b /* " " B " " " " */ |
||
say ' LCsubstr =' LCsubstr(a, b) /*display the Longest Common Substring.*/ |
say ' LCsubstr =' LCsubstr(a, b) /*display the Longest Common Substring.*/ |
||
exit |
exit 0 /*stick a fork in it, we're all done. */ |
||
/*──────────────────────────────────────────────────────────────────────────────────────*/ |
/*──────────────────────────────────────────────────────────────────────────────────────*/ |
||
LCsubstr: procedure; parse arg x,y,,$; #= 0 /*LCsubstr: Longest Common Substring. */ |
LCsubstr: procedure; parse arg x,y,,$; #= 0 /*LCsubstr: Longest Common Substring. */ |