Create abstract class for spacing algorithms

l3kn · Mar 11, 2024 · 5efbaf3 · 5efbaf3
1 parent 530832d
commit 5efbaf3
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 1 deletion.
diff --git a/org-fc-algo-sm2.el b/org-fc-algo-sm2.el
@@ -135,7 +135,7 @@ INTERVAL is by a random factor between `org-fc-algo-sm2-fuzz-min' and
 
 ;;;; Main Algorithm Interface
 
-(defclass org-fc-algo-sm2 (eieio-singleton) ())
+(defclass org-fc-algo-sm2 (eieio-singleton org-fc-algo) ())
 
 (cl-defmethod org-fc-algo-headers ((_algo org-fc-algo-sm2))
   '(position ease box interval due))

diff --git a/org-fc-core.el b/org-fc-core.el
@@ -243,6 +243,11 @@ If point is not inside a flashcard entry, an error is raised."
 
 ;;; Classes
 
+(defclass org-fc-algo ()
+  ()
+  "Spacing algorithm interface."
+  :abstract t)
+
 (defclass org-fc-file ()
   ((path
     :initarg :path