Skip to content

#'build-finite-ss launches interactive inspector #151

@jcguu95

Description

@jcguu95

In the manual, we expect #'build-finite-ss to return an object.

(setf cylinss (build-finite-ss
    '(v0 v1
      1 e0 (v1 v0) e1 (v1 v1) e2 (v0 v0) e3 (v1 v0)
      2 t0 (e1 e3 e0) t1 (e0 e3 e2)) ))  ==>

[K2 Simplicial-Set]

However, its source code uses inspect, which on sbcl launches an interactive session. I suggest to change inspect to describe to keep alignment with the description in the manual.

(DEFUN BUILD-FINITE-SS (list)
  (declare (list list))
  (let ((bspn (first list))
        (table (finite-ss-table list))
        (ind-smst (gensym)))
      [..]
      (setf (symbol-value ind-smst) rslt)
      (inspect rslt)   ;; use DESCRIBE instead
      [..]
      rslt)))

Metadata

Metadata

Assignees

No one assigned

    Labels

    No labels
    No labels

    Projects

    No projects

    Milestone

    No milestone

    Relationships

    None yet

    Development

    No branches or pull requests

    Issue actions