From 13c44895787e12a20fe6aee503c6367c771b7578 Mon Sep 17 00:00:00 2001
From: Johanna Amann <johanna@icir.org>
Date: Thu, 21 Jan 2016 13:56:21 -0800
Subject: [PATCH] Testcase for crash when a record contains a function
 referencing a record.

Needs BRO_PROFILER_FILE set to crash
---
 .../language/record-function-recursion.bro    | 19 +++++++++++++++++++
 1 file changed, 19 insertions(+)
 create mode 100644 testing/btest/language/record-function-recursion.bro

diff --git a/testing/btest/language/record-function-recursion.bro b/testing/btest/language/record-function-recursion.bro
new file mode 100644
index 0000000000..b43c7bfe80
--- /dev/null
+++ b/testing/btest/language/record-function-recursion.bro
@@ -0,0 +1,19 @@
+# @TEST-EXEC: bro -b %INPUT 2>&1 >out
+# @TEST-EXEC: btest-diff out
+
+type Outer: record {
+	id: count &optional;
+};
+
+type Inner: record {
+	create: function(input: Outer) : string;
+};
+
+redef record Outer += {
+	inner: Inner &optional;
+};
+
+event bro_init() {
+	local o = Outer();
+	print o;
+}