Better tests

[data-dump-sexp.git] / t / Opaque.pm

diff --git a/t/Opaque.pm b/t/Opaque.pm
new file mode 100644 (file)
index 0000000..9cff7a1
--- /dev/null
+++ b/t/Opaque.pm
@@ -0,0 +1,7 @@
+package Opaque;
+
+sub new { bless {}, shift }
+
+sub to_sexp { Data::SExpression::Symbol->new('<opaque>') }
+
+1