Action:
|
Print a full and relatively readable description of the entire contents of a
tm-chk-info on an output port, terminating without a newline.
|
|
Filename:
|
intr/intr_scm/tmchk_typ.cxx
|
|
Syntax:
|
(tm-chk-info:print1 tm-check [port])
|
|
Arg Types:
|
tm-check
|
tm-chk-info
|
|
port
|
string
|
|
Returns:
|
tm-chk-info
|
|
Description:
|
Prints a full and relatively readable description of the entire contents of the
tm-chk-info (first argument) on the given output
port (second argument), default to the current output port if the second argument is omitted. The output is terminated without a newline.
|
|
|
tm-check is an object of type
tm-chk-info that contains tolerant modeling check details.
|
|
|
port specifies the output port to which the the contents of
tm-check are written and the output is terminated without a newline.
|
|
Example:
|
; tm-chk-info:print1
|
|
; Print out the contents of a given tolerant model
|
|
; information set.
|
|
(define b (solid:block (position 0 0 0)
|
|
|
(position 10 10 10)))
|
|
;; b
|
|
(define errors (tm-check:all (car (entity:edges b))))
|
|
;; errors
|
|
(tm-chk-info:print1 (car errors))
|
|
; tm_bad_topology: edge 1413712
|
|
;; #[tm_bad_topology 4059b210]
|