Differences From Artifact [34517169c8]:

• File src/natools-s_expressions-templates-generic_integers.adb — part of check-in [3c1dba5e77] at 2014-09-29 21:50:58 on branch trunk — s_expressions-templates-generic_integers: add width information to prefix and suffixes (user: nat size: 30545)

To Artifact [0b26ca8f47]:

• File src/natools-s_expressions-templates-generic_integers.adb — part of check-in [076d8be66e] at 2014-10-01 17:51:20 on branch trunk — s_expressions-templates-generic_integers: new command for input of several images, leveraging affix syntax (user: nat size: 30629)

130
131
132
133
134
135
136



137
138
139
140
141
142
143

         when Commands.Align_Right =>
            State.Set_Align (Right_Aligned);

         when Commands.Base =>
            State.Set_Symbols (Arguments);




         when Commands.Images =>
            Image_Interpreter (Arguments, State, Meaningless_Value);

         when Commands.Padding =>
            case Arguments.Current_Event is
               when Events.Add_Atom =>
                  State.Left_Padding := Create (Arguments.Current_Atom);

>
>
>

130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146

         when Commands.Align_Right =>
            State.Set_Align (Right_Aligned);

         when Commands.Base =>
            State.Set_Symbols (Arguments);

         when Commands.Image_Range =>
            Parse (State.Images, Arguments);

         when Commands.Images =>
            Image_Interpreter (Arguments, State, Meaningless_Value);

         when Commands.Padding =>
            case Arguments.Current_Event is
               when Events.Add_Atom =>
                  State.Left_Padding := Create (Arguments.Current_Atom);