Anonymous user
Print debugging statement: Difference between revisions
m
→{{header|Racket}}
Line 48:
(define (debug:core line col code val #:label [label #f])
;; if label exists, use it instead of the code fragment
(printf "~a at line ~a column ~a\n" (or label code) line col)
(printf "result: ~a\n\n" val)
| |||