[Emacs-diffs] scratch/record ebfeec4: Test case for defstruct constructor problem.

[Lars Brinkhoff]

branch: scratch/record
commit ebfeec49a17c8a51b41710d5873ed7a4d08ee0c1
Author: Lars Brinkhoff <address@hidden>
Commit: Lars Brinkhoff <address@hidden>

    Test case for defstruct constructor problem.
    
    Compiled with Emacs built from master.
---
 old-struct.el  |  13 +++++++++++++
 old-struct.elc | Bin 0 -> 2971 bytes
 2 files changed, 13 insertions(+)

diff --git a/old-struct.el b/old-struct.el
new file mode 100644
index 0000000..830d211
--- /dev/null
+++ b/old-struct.el
@@ -0,0 +1,13 @@
+(require 'cl-macs)
+
+(cl-defstruct old x)
+
+(defun foo ()
+  (make-old))
+
+;;(byte-compile-file "old-struct.el")
+;;(load-file "old-struct.elc")
+;;(disassemble 'foo)
+;;(cl-typep (foo) 'cl-structure-object)
+;;(cl-struct-p (foo))
+;;(memq (aref (foo) 0) cl-struct-cl-structure-object-tags)
diff --git a/old-struct.elc b/old-struct.elc
new file mode 100644
index 0000000..49b1765
Binary files /dev/null and b/old-struct.elc differ