didnt know about type-classes when started this, now its confusing

package.lisp

@@ -739,7 +739,7 @@
     (:use #:cl #:varjo.utils #:varjo.internals #:vari.types
           #:named-readtables #:glsl-symbols #:varjo-conditions)
   (:import-from :varjo.internals
-                :def-v-type-class)
+                :v-deftype-internal)
   (:reexport :vari.types)
   (:reexport :glsl-symbols)
   (:export
@@ -801,7 +801,7 @@
                 :flatten
                 :iota)
   (:import-from :varjo.internals
-                :def-v-type-class)
+                :v-deftype-internal)
   (:reexport :vari.types :vari.glsl)
   (:export
    ;; special functions

src/vari.glsl/built-in-types.lisp

@@ -9,7 +9,7 @@
   (diff v-float :accessor diff))
 
 (eval-when (:compile-toplevel :load-toplevel :execute)
-  (def-v-type-class v-per-vertex (v-ephemeral-type) ()))
+  (v-deftype-internal v-per-vertex (v-ephemeral-type) ()))
 
 (v-def-glsl-template-fun gl-position (vert-data) "~a.gl_Position" (v-per-vertex) :vec4)
 (v-def-glsl-template-fun gl-point-size (vert-data) "~a.gl_PointSize" (v-per-vertex) :float)