X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fmath%2Fcategoricals.c;h=af79023a20cdf793fc162d913d37dacb1f66727f;hb=cdb164714ff698752666bdfade6cf18a8bbeb8a4;hp=a2cf9dd7854c130afee0e6de6cda28b506e9d486;hpb=72d873a1af4914c2bfe1cdda1cb0108da243f534;p=pspp-builds.git

diff --git a/src/math/categoricals.c b/src/math/categoricals.c
index a2cf9dd7..af79023a 100644
--- a/src/math/categoricals.c
+++ b/src/math/categoricals.c
@@ -599,21 +599,6 @@ categoricals_get_interaction_by_subscript (const struct categoricals *cat, int s
   return cat->iap[index].iact;
 }
 
-/* Return the case corresponding to SUBSCRIPT */
-static const struct ccase *
-categoricals_get_case_by_subscript (const struct categoricals *cat, int subscript)
-{
-  int vindex = reverse_variable_lookup_short (cat, subscript);
-  const struct interact_params *vp = &cat->iap[vindex];
-  const struct interaction_value *vn = vp->reverse_interaction_value_map [subscript - vp->base_subscript_short];
-
-  if ( vn == NULL)
-    return NULL;
-
-  return vn->ccase;
-}
-
-
 double
 categoricals_get_weight_by_subscript (const struct categoricals *cat, int subscript)
 {