diff options
author | Gustav Simonsson <[email protected]> | 2012-02-16 14:28:33 +0100 |
---|---|---|
committer | Gustav Simonsson <[email protected]> | 2012-02-16 14:28:33 +0100 |
commit | ddefaf865cb357a11e0aa80315a461e774c0d6fb (patch) | |
tree | db95fd01eb847cef12b4dded236ce97a8ff5d8db /lib/asn1/test/asn1_SUITE.erl.src | |
parent | a7d95881e8701f1c071d9a957172027a287e6f73 (diff) | |
parent | da3d4c3bc803a8697c2e35c95d05417ac39ad497 (diff) | |
download | otp-ddefaf865cb357a11e0aa80315a461e774c0d6fb.tar.gz otp-ddefaf865cb357a11e0aa80315a461e774c0d6fb.tar.bz2 otp-ddefaf865cb357a11e0aa80315a461e774c0d6fb.zip |
Merge branch 'gustav/asn1-integer/sequence-fix/OTP-9688' into maint
Diffstat (limited to 'lib/asn1/test/asn1_SUITE.erl.src')
-rw-r--r-- | lib/asn1/test/asn1_SUITE.erl.src | 24 |
1 files changed, 22 insertions, 2 deletions
diff --git a/lib/asn1/test/asn1_SUITE.erl.src b/lib/asn1/test/asn1_SUITE.erl.src index 124ee2d2bb..3f51b125ec 100644 --- a/lib/asn1/test/asn1_SUITE.erl.src +++ b/lib/asn1/test/asn1_SUITE.erl.src @@ -96,7 +96,8 @@ all() -> [{group,compile},parse,default_per,default_ber,default_per_opt,per, testSSLspecs, testNortel,test_undecoded_rest, test_inline, testTcapsystem, testNBAPsystem, test_compile_options,testDoubleEllipses, test_modified_x420, - testX420, test_x691,ticket_6143, testExtensionAdditionGroup + testX420, test_x691,ticket_6143, testExtensionAdditionGroup, + test_OTP_9688 ] ++ common() ++ particular(). groups() -> @@ -2369,4 +2370,23 @@ test_modules() -> "LDAP" ]. - +test_OTP_9688(Config) -> + Asn1Mod = "OTP-9688.asn1", + %%DataDir = ?config(data_dir,Config), + PrivDir = ?config(priv_dir,Config), + Data = " +OTP-9688 DEFINITIONS ::= BEGIN + + foo INTEGER ::= 1 + bar INTEGER ::= 42 + + Baz ::= INTEGER {x-y-z1(foo), x-y-z2(bar)} + Qux ::= SEQUENCE {flerpInfo SEQUENCE {x INTEGER (-10 | -9 | (0..4))} OPTIONAL} + +END +", + File = filename:join(PrivDir,Asn1Mod), + ok = file:write_file(File, Data), + %% Does it compile with changes to asn1ct_check and asn1ct_gen_per_rt2ct? + %% (see ticket) + ok = asn1ct:compile(File, [{outdir, PrivDir}]). |