xref: /aosp_15_r20/external/emboss/testdata/format/virtual_fields.emb (revision 99e0aae7469b87d12f0ad23e61142c2d74c1ef70)
1# Copyright 2019 Google LLC
2#
3# Licensed under the Apache License, Version 2.0 (the "License");
4# you may not use this file except in compliance with the License.
5# You may obtain a copy of the License at
6#
7#     https://www.apache.org/licenses/LICENSE-2.0
8#
9# Unless required by applicable law or agreed to in writing, software
10# distributed under the License is distributed on an "AS IS" BASIS,
11# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12# See the License for the specific language governing permissions and
13# limitations under the License.
14
15-- Formatting of virtual fields, mixed in with nonvirtual fields.
16
17enum Values:
18  FOO = 1
19  BAR = 2
20
21struct Foo:
22  let   important_constant = Values.FOO# comm
23  0 [+1]UInt len  # comment
24  # comment comment comment
25  1[+2]     LongTypeName long_value_name  # comment?
26  let   s = len - 2
27  if($size_in_bytes  )>        10	   :
28   2[+s]  SubMessage submessage
29  let   truth=Bar .   top
30  if  Bar  .$max_size_in_bits < 2:
31   Bar.  $min_size_in_bits [+1]  Int    x
32
33bits Bar:
34  let top = true
35  0 [+1]Flag allowed
36  if $size_in_bits>10:
37    let s = 100
38    2[+s]  SubMessage submessage
39  if  Foo  .$max_size_in_bytes < 2:
40   Foo.  $min_size_in_bytes [+1]  Int    x
41