From e32a59bd5a82bfc49af14112d21645a00d0b4476 Mon Sep 17 00:00:00 2001 From: Sergey Romanov Date: Tue, 13 Aug 2019 10:37:23 +0600 Subject: [PATCH] Some improvements --- UTILITIES_STRING.st | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) diff --git a/UTILITIES_STRING.st b/UTILITIES_STRING.st index 3da297e..e3bc478 100644 --- a/UTILITIES_STRING.st +++ b/UTILITIES_STRING.st @@ -196,11 +196,7 @@ IMPLEMENTATION in1_len := LEN(in1); in2_len := LEN(in2); - IF in1_len < in2_len THEN - i_end := in1_len; - ELSE - i_end := in2_len; - END_IF; + i_end := MIN(in1_len, in2_len); FOR i := 0 TO i_end DO IF in1[i] <> in2[i] THEN