Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP

Loading…

Fix AREF call in TERM-DOC-FREQS #9

Open
wants to merge 1 commit into from

1 participant

@quicklisp

TERM-DOC-FREQS had an index variable and array variable transposed in AREF. This inhibited compilation on SBCL 1.1.13, which detected the problem via type inference. Changing the variables restores the ability to compile on SBCL 1.1.13.

@quicklisp quicklisp Fix AREF call in TERM-DOC-FREQS
TERM-DOC-FREQS had an index variable and array variable transposed in AREF. This inhibited compilation on SBCL 1.1.13, which detected the problem via type inference. Changing the variables restores the ability to compile on SBCL 1.1.13.
35094e8
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Commits on Nov 6, 2013
  1. @quicklisp

    Fix AREF call in TERM-DOC-FREQS

    quicklisp authored
    TERM-DOC-FREQS had an index variable and array variable transposed in AREF. This inhibited compilation on SBCL 1.1.13, which detected the problem via type inference. Changing the variables restores the ability to compile on SBCL 1.1.13.
This page is out of date. Refresh to see the latest.
Showing with 1 addition and 1 deletion.
  1. +1 −1  src/search/index-searcher.lisp
View
2  src/search/index-searcher.lisp
@@ -38,7 +38,7 @@
(defmethod term-doc-freqs ((self index-searcher) (terms sequence))
(let ((result (make-array (length terms))))
(dosequence (i terms)
- (setf (aref i result)
+ (setf (aref result i)
(term-doc-freq self (aref terms i))))
(values result)))
Something went wrong with that request. Please try again.