patch 9.0.1152: class "implements" argument not implemented
Problem: Class "implements" argument not implemented.
Solution: Implement "implements" argument. Add basic checks for when a
class implements an interface.
diff --git a/src/eval.c b/src/eval.c
index c9d2151..0460dec 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -5676,7 +5676,8 @@
case VAR_CLASS:
{
class_T *cl = tv->vval.v_class;
- if (cl != NULL && cl->class_copyID != copyID)
+ if (cl != NULL && cl->class_copyID != copyID
+ && (cl->class_flags && CLASS_INTERFACE) == 0)
{
cl->class_copyID = copyID;
for (int i = 0; !abort