parenboost/console.lisp at master · Junker/parenboost · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
(in-package :parenboost)

(defpsmacro console-log (arg1 &rest args)
  `(chain console (log ,arg1 ,@args)))

(defpsmacro console-debug (arg1 &rest args)
  `(chain console (debug ,arg1 ,@args)))

(defpsmacro console-info (arg1 &rest args)
  `(chain console (info ,arg1 ,@args)))

(defpsmacro console-warn (arg1 &rest args)
  `(chain console (warn ,arg1 ,@args)))

(defpsmacro console-error (arg1 &rest args)
  `(chain console (error ,arg1 ,@args)))

(defpsmacro console-trace (arg1 &rest args)
  `(chain console (trace ,arg1 ,@args)))

(defpsmacro console-assert (assertion &rest args)
  `(chain console (assert ,assertion ,@args)))

(defpsmacro console-time (label)
  `(chain console (time ,label)))

(defpsmacro console-time-end (label)
  `(chain console (time-end ,label)))