aboutsummaryrefslogtreecommitdiffstats
path: root/lib/asn1/test/asn1_SUITE_data/Objects.asn
diff options
context:
space:
mode:
authorKenneth Lundin <[email protected]>2010-02-19 14:01:57 +0000
committerErlang/OTP <[email protected]>2010-02-19 14:01:57 +0000
commit18bd1239bee04427340a44f57f993ea92c264e41 (patch)
treedbb3031dcd2e446eb457ff7ac5229949517d7557 /lib/asn1/test/asn1_SUITE_data/Objects.asn
parent729565dc3f8bcf8829508136498aef6a542840f4 (diff)
downloadotp-18bd1239bee04427340a44f57f993ea92c264e41.tar.gz
otp-18bd1239bee04427340a44f57f993ea92c264e41.tar.bz2
otp-18bd1239bee04427340a44f57f993ea92c264e41.zip
OTP-8463 Support for EXTENSIBILITY IMPLIED and SET/SEQ OF NamedType is
added.
Diffstat (limited to 'lib/asn1/test/asn1_SUITE_data/Objects.asn')
-rw-r--r--lib/asn1/test/asn1_SUITE_data/Objects.asn61
1 files changed, 61 insertions, 0 deletions
diff --git a/lib/asn1/test/asn1_SUITE_data/Objects.asn b/lib/asn1/test/asn1_SUITE_data/Objects.asn
new file mode 100644
index 0000000000..f911acbbe9
--- /dev/null
+++ b/lib/asn1/test/asn1_SUITE_data/Objects.asn
@@ -0,0 +1,61 @@
+Objects DEFINITIONS ::=
+BEGIN
+
+OPERATION ::= CLASS
+ {
+ &ArgumentType OPTIONAL,
+ &ResultType OPTIONAL,
+ &Errors ERROR OPTIONAL,
+ &Linked OPERATION OPTIONAL,
+ &resultReturned BOOLEAN DEFAULT TRUE,
+ &operationCode INTEGER UNIQUE
+ }
+WITH SYNTAX
+ {
+ [ARGUMENT &ArgumentType]
+ [RESULT &ResultType]
+ [RETURN RESULT &resultReturned]
+ [ERRORS &Errors]
+ [LINKED &Linked]
+ CODE &operationCode
+ }
+
+ERROR ::= CLASS
+ {
+ &ParameterType OPTIONAL,
+ &errorCode INTEGER UNIQUE
+ }
+WITH SYNTAX
+ {
+ [PARAMETER &ParameterType]
+ CODE &errorCode
+ }
+
+My-Operations OPERATION ::= { operationA | operationB }
+
+operationA OPERATION ::= {
+ ARGUMENT INTEGER
+ ERRORS { { PARAMETER INTEGER CODE 1000 } | { CODE 1001 } }
+ CODE 1
+}
+
+operationB OPERATION ::= {
+ ARGUMENT IA5String
+ RESULT BOOLEAN
+ ERRORS { { CODE 1002 } | { PARAMETER IA5String CODE 1003 } }
+ CODE 2
+}
+
+My-OperationErrors ERROR ::= { My-Operations.&Errors }
+
+My-OperationAERror ERROR ::= {operationA.&Errors}
+-- Equals:
+-- My-OperationErrors ERROR ::= { { PARAMETER INTEGER CODE 1000 } | { CODE 1001 } | { CODE 1002 } | { PARAMETER IA5String CODE 1003 } }
+
+My-OperationErrorCodes INTEGER ::= { My-Operations.&Errors.&errorCode }
+-- Equals:
+-- My-OperationErrorCodes INTEGER ::= { 1000 | 1001 | 1002 | 1003 }
+
+END
+
+