printv

Purpose
Assist debugging by printing forms and the results of evaluating them to *trace-output*.

Package   :gbbopen-tools (home package is :module-manager)

Module   :module-manager

Arguments and values

Returns
The values returned by evaluating the last form that is not the keyword symbol :hr

Description
The following is performed for each form in forms:

• if the form is the keyword symbol :hr, a dashed separator line printed to *trace-output*
• if the form is a string (before evaluation), it is treated as a label and printed to *trace-output* without enclosing double-quote characters
• if the form is a self-evaluating object, it is printed to *trace-output*
• otherwise, the form is printed to *trace-output*, then the form is evaluated and the result values are printed to *trace-output*.

See also
    printvot

Examples

  > (printv :hr "PRINTV example" (list 1 2) (list 3 4) '"A quoted string" 
            "Return no values:" (values)
            "Return multiple values:" (values 5 6) :hr)
  ;; ------------------------------------------------------------
  ;; PRINTV example
  ;;   (list 1 2) => (1 2)
  ;;   (list 3 4) => (3 4)
  ;; Return no values:
  ;;   (values) => [returned 0 values]
  ;;   '"A quoted string" => "A quoted string"
  ;; Return multiple values:
  ;;   (values 5 6) => 5; 6
  ;; ------------------------------------------------------------
  5
  6
  > (printv *package* (object-address *package* 't))
  ;;  *package* => #<The GBBOPEN-USER package>
  ;;  (object-address *package* 't) => "71b32f5a"
  "71b32f5a"
  >

Note
This macro is defined in the :module-manager module in order to make it available as early as possible.

printv