X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fexpressions%2Foperations.def;h=7bcc02da3189260294a8b19bec560fa1784dcc7b;hb=b525a9596e60d5ae4c6c464b4a426b77ade3dd72;hp=4f1e515026f7a54cd62bbf08fa7471dad481f009;hpb=89c05dfe33f9542e60e66dd383f7a514849b5947;p=pspp

diff --git a/src/language/expressions/operations.def b/src/language/expressions/operations.def
index 4f1e515026..7bcc02da31 100644
--- a/src/language/expressions/operations.def
+++ b/src/language/expressions/operations.def
@@ -816,10 +816,10 @@ absorb_miss string function SUBSTR (string s, integer ofs)
           : empty_string);
 }
 
-absorb_miss string function SUBSTR (string s, integer ofs, integer cnt)
+absorb_miss string function SUBSTR (string s, integer ofs, integer len)
 {
-  return (ofs >= 1 && cnt >= 1
-          ? ss_substr (s, ofs - 1, cnt)
+  return (ofs >= 1 && len >= 1
+          ? ss_substr (s, ofs - 1, len)
           : empty_string);
 }