From 6fe823a614279cceb2d48507bd8e93b0efd87f94 Mon Sep 17 00:00:00 2001
From: Thomas Albers <thomas@thomaslabs.org>
Date: Sat, 4 Mar 2023 22:47:28 +0100
Subject: Initial commit

---
 src/flush.lisp | 7 +++++++
 1 file changed, 7 insertions(+)
 create mode 100644 src/flush.lisp

(limited to 'src/flush.lisp')

diff --git a/src/flush.lisp b/src/flush.lisp
new file mode 100644
index 0000000..4ab282b
--- /dev/null
+++ b/src/flush.lisp
@@ -0,0 +1,7 @@
+(in-package #:ocl)
+
+(defun flush (command-queue)
+  (check-error (%flush command-queue)))
+
+(defun finish (command-queue)
+  (check-error (%finish command-queue)))
-- 
cgit v1.2.3