X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fmath%2Fsort.c;h=fbd40d9b966897ec4df1afd7e53e7916e8dec022;hb=338fb2a2e84df6427a2fdee6769421f57d5666d8;hp=7d2469a88b8519aaceb6465c4c10368f4ee7d6c7;hpb=946282d65fa0142e38d10f78d2c699dacf95300e;p=pspp-builds.git

diff --git a/src/math/sort.c b/src/math/sort.c
index 7d2469a8..fbd40d9b 100644
--- a/src/math/sort.c
+++ b/src/math/sort.c
@@ -463,13 +463,14 @@ compare_record (const struct ccase *a, const struct ccase *b,
       
       if (c->width == 0)
         {
-          double af = case_num (a, c->fv);
-          double bf = case_num (b, c->fv);
+          double af = case_num_idx (a, c->fv);
+          double bf = case_num_idx (b, c->fv);
           
           result = af < bf ? -1 : af > bf;
         }
       else
-        result = memcmp (case_str (a, c->fv), case_str (b, c->fv), c->width);
+        result = memcmp (case_str_idx (a, c->fv),
+                         case_str_idx (b, c->fv), c->width);
 
       if (result != 0)
         return c->dir == SRT_ASCEND ? result : -result;