diff options
author | Thomas Albers <thomas@thomaslabs.org> | 2023-03-04 22:47:28 +0100 |
---|---|---|
committer | Thomas Albers <thomas@thomaslabs.org> | 2023-03-04 22:47:28 +0100 |
commit | 6fe823a614279cceb2d48507bd8e93b0efd87f94 (patch) | |
tree | 579e3c5db456667ce2aeda94f909703513179ce1 /src/profiling.lisp |
Initial commit
Diffstat (limited to 'src/profiling.lisp')
-rw-r--r-- | src/profiling.lisp | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/src/profiling.lisp b/src/profiling.lisp new file mode 100644 index 0000000..2d186d6 --- /dev/null +++ b/src/profiling.lisp @@ -0,0 +1,11 @@ +(in-package #:ocl) + +(defparameter +event-profiling-info-type-alist+ + '((:profiling-command-queued . cl-ulong) + (:profiling-command-submit . cl-ulong) + (:profiling-command-start . cl-ulong) + (:profiling-command-end . cl-ulong) + (:profiling-command-complete . cl-ulong))) + +(wrap-get-info-function get-event-profiling-info %get-event-profiling-info + +event-profiling-info-type-alist+) |