From 39c2b9062867a8f9989b9f86153b28cf79494f0e Mon Sep 17 00:00:00 2001
From: Tyler Wilding <xTVaser@users.noreply.github.com>
Date: Fri, 2 Jul 2021 01:10:33 -0400
Subject: [PATCH] decomp: finish `drawable-inline-array` just a bunch of stubs
 (#665)

---
 goal_src/engine/draw/drawable-inline-array.gc | 26 +++++++++++++
 .../engine/draw/drawable-inline-array_REF.gc  | 38 +++++++++++++++++++
 2 files changed, 64 insertions(+)
 create mode 100644 test/decompiler/reference/engine/draw/drawable-inline-array_REF.gc

diff --git a/goal_src/engine/draw/drawable-inline-array.gc b/goal_src/engine/draw/drawable-inline-array.gc
index 221782fbe1..60ef6c31f2 100644
--- a/goal_src/engine/draw/drawable-inline-array.gc
+++ b/goal_src/engine/draw/drawable-inline-array.gc
@@ -5,3 +5,29 @@
 ;; name in dgo: drawable-inline-array
 ;; dgos: GAME, ENGINE
 
+;; - All these methods are stubs
+
+(defmethod length drawable-inline-array ((obj drawable-inline-array))
+  (-> obj length)
+  )
+
+(defmethod dummy-9 drawable-inline-array ((obj drawable-inline-array))
+  obj
+  )
+
+(defmethod
+  dummy-10
+  drawable-inline-array
+  ((obj drawable-inline-array) (arg0 drawable) (arg1 display-frame))
+  0
+  )
+
+(defmethod dummy-14 drawable-inline-array ()
+  0
+  (none)
+  )
+
+(defmethod dummy-15 drawable-inline-array ((obj drawable-inline-array))
+  0
+  (none)
+  )
diff --git a/test/decompiler/reference/engine/draw/drawable-inline-array_REF.gc b/test/decompiler/reference/engine/draw/drawable-inline-array_REF.gc
new file mode 100644
index 0000000000..c05d53d402
--- /dev/null
+++ b/test/decompiler/reference/engine/draw/drawable-inline-array_REF.gc
@@ -0,0 +1,38 @@
+;;-*-Lisp-*-
+(in-package goal)
+
+;; definition for method 4 of type drawable-inline-array
+(defmethod length drawable-inline-array ((obj drawable-inline-array))
+  (-> obj length)
+  )
+
+;; definition for method 9 of type drawable-inline-array
+(defmethod dummy-9 drawable-inline-array ((obj drawable-inline-array))
+  obj
+  )
+
+;; definition for method 10 of type drawable-inline-array
+(defmethod
+  dummy-10
+  drawable-inline-array
+  ((obj drawable-inline-array) (arg0 drawable) (arg1 display-frame))
+  0
+  )
+
+;; definition for method 14 of type drawable-inline-array
+;; INFO: Return type mismatch int vs none.
+(defmethod dummy-14 drawable-inline-array ()
+  0
+  (none)
+  )
+
+;; definition for method 15 of type drawable-inline-array
+;; INFO: Return type mismatch int vs none.
+(defmethod dummy-15 drawable-inline-array ((obj drawable-inline-array))
+  0
+  (none)
+  )
+
+
+
+