support loading a cl-collider:env as a bdef/wavetable

defaultxr · Nov 5, 2020 · 9681973 · 9681973
1 parent a1afea0
commit 9681973
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/cl-collider.lisp b/cl-collider.lisp
@@ -39,6 +39,9 @@
 (defmethod bdef-backend-free ((buffer cl-collider::buffer))
   (cl-collider:buffer-free buffer))
 
+(defmethod bdef-load ((env cl-collider::env) &rest rest &key &allow-other-keys)
+  (apply #'bdef-backend-load :cl-collider env rest))
+
 (defmethod bdef-length ((buffer cl-collider::buffer))
   (cl-collider:frames buffer))