vseloved / cl-nlp

Common Lisp NLP toolset
Other
219 stars 28 forks source link

dict-lemmatizer fails to build #36

Open manugoswami opened 1 year ago

manugoswami commented 1 year ago

dict-lemmatizer fails to build

Error below Kindly resolve most urgently

;;; Error: ;;; in file dict-lemmatizer.lisp, position 709 ;;; at (DEFMETHOD LEMMATIZE ...) ;;; * The macro form (DEFMETHOD LEMMATIZE ((LEMMATIZER MEM-DICT) WORD &OPTIONAL POS) (UNLESS (LOOKUP (SMART-SLOT-VALUE LEMMATIZER 'WORDS) WORD) (RETURN-FROM LEMMATIZE WORD)) (LET ((POSS (POS-TAGS LEMMATIZER WORD) :TEST 'EQUALP)) (IF-IT (OR (MEMBER POS POSS) (UNLESS POS (MEMBER-IF (RUTILS.READTABLE::TRIVIAL-POSITIONAL-LAMBDA (= 2 (LENGTH (PRINC-TO-STRING (? % 0))))) POSS))) (VALUES WORD IT) (WITH ((WORD-POS PRESENT? (IF POS (COND-IT ((? (SMART-SLOT-VALUE LEMMATIZER 'FORMS) (WORD/POS WORD POS)) (VALUES IT T)) ((? (SMART-SLOT-VALUE LEMMATIZER 'FORMS) (WORD/POS WORD (FIRST (MKLIST POS)))) (VALUES (ARGMAX 'IDENTITY IT :KEY (RUTILS.READTABLE::TRIVIAL-POSITIONAL-LAMBDA (PRECEDENCE LEMMATIZER (? % 0 0)))) T))) (|GET#| WORD (SMART-SLOT-VALUE LEMMATIZER 'FORMS))))) (:= WORD-POS (REMOVE-DUPLICATES WORD-POS :TEST 'EQUALP)) (IF PRESENT? (VALUES (? WORD-POS 0 0) (? WORD-POS 0 1) (REST WORD-POS)) (VALUES NIL NIL (MAPCAR (RUTILS.READTABLE::TRIVIAL-POSITIONAL-LAMBDA (PAIR WORD %)) POSS))))))) was not expanded successfully. ;;; Error detected: ;;; In form ;;; (LET ((POSS (POS-TAGS LEMMATIZER WORD) :TEST 'EQUALP)) (IF-IT (OR (MEMBER POS POSS) (UNLESS POS (MEMBER-IF (RUTILS.READTABLE::TRIVIAL-POSITIONAL-LAMBDA (= 2 (LENGTH (PRINC-TO-STRING (? % 0))))) POSS))) (VALUES WORD IT) (WITH ((WORD-POS PRESENT? (IF POS (COND-IT ((? (SMART-SLOT-VALUE LEMMATIZER 'FORMS) (WORD/POS WORD POS)) (VALUES IT T)) ((? (SMART-SLOT-VALUE LEMMATIZER 'FORMS) (WORD/POS WORD (FIRST (MKLIST POS)))) (VALUES (ARGMAX 'IDENTITY IT :KEY (RUTILS.READTABLE::TRIVIAL-POSITIONAL-LAMBDA (PRECEDENCE LEMMATIZER (? % 0 0)))) T))) (|GET#| WORD (SMART-SLOT-VALUE LEMMATIZER 'FORMS))))) (:= WORD-POS (REMOVE-DUPLICATES WORD-POS :TEST 'EQUALP)) (IF PRESENT? (VALUES (? WORD-POS 0 0) (? WORD-POS 0 1) (REST WORD-POS)) (VALUES NIL NIL (MAPCAR (RUTILS.READTABLE::TRIVIAL-POSITIONAL-LAMBDA (PAIR WORD %)) POSS)))))) ;;; LET: Ill formed declaration. Condition of type: COMPILE-FILE-ERROR COMPILE-FILE-ERROR while compiling #<cl-source-file "cl-nlp" "src" "lexics" "dict-lemmatizer">

Available restarts:

  1. (RETRY) Retry compiling #<cl-source-file "cl-nlp" "src" "lexics" "dict-lemmatizer">.
  2. (ACCEPT) Continue, treating compiling #<cl-source-file "cl-nlp" "src" "lexics" "dict-lemmatizer"> as having been successful.
  3. (RETRY) Retry ASDF operation.
  4. (CLEAR-CONFIGURATION-AND-RETRY) Retry ASDF operation after resetting the configuration.
  5. (ABORT) Give up on "cl-nlp"
  6. (REGISTER-LOCAL-PROJECTS) Register local projects and try again.
  7. (RESTART-TOPLEVEL) Go back to Top-Level REPL.