From 1c79a4fd03cea47d20f5de00bbdaa8b8bd025ad0 Mon Sep 17 00:00:00 2001
From: Dan Gudmundsson <dgud@erlang.org>
Date: Tue, 28 Oct 2014 12:52:12 +0100
Subject: Use recursive get_referenced_type to get classdef directly

To be sure that indirect references to classes are solved.
---
 lib/asn1/test/testParamBasic.erl | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'lib/asn1/test/testParamBasic.erl')

diff --git a/lib/asn1/test/testParamBasic.erl b/lib/asn1/test/testParamBasic.erl
index 39f7947e8d..52c6426414 100644
--- a/lib/asn1/test/testParamBasic.erl
+++ b/lib/asn1/test/testParamBasic.erl
@@ -46,6 +46,10 @@ main(Rules) ->
     roundtrip('AnAlgorithm', {'AnAlgorithm',1,42}),
     roundtrip('AnAlgorithm', {'AnAlgorithm',2,true}),
     roundtrip('AnAlgorithm', {'AnAlgorithm',2,false}),
+
+    roundtrip('Seq', {'Seq',
+		      {'Seq_c1',{2,1,1},42},
+		      {'Seq_c2',{2,1,1,1},asn1_NOVALUE}}),
     ok.
 
 roundtrip(Type, Value) ->
-- 
cgit v1.2.3