Natools

Check-in [2e6bc3b47c]
Login
Overview
Comment:sxcat: abort with error status on newline encoding parse error
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 2e6bc3b47c5e8c0bd4e3965de2bf506127ad1999
User & Date: nat on 2014-08-02 21:19:25
Other Links: manifest | tags
Context
2014-08-03
20:04
sxcat: fix parsing of the second entity in parsing separator arguments check-in: fc6a5f0338 user: nat tags: trunk
2014-08-02
21:19
sxcat: abort with error status on newline encoding parse error check-in: 2e6bc3b47c user: nat tags: trunk
2014-08-01
20:35
tools/tests.sh: add a fully-covering test suite for `sxcat` tool check-in: 9bea00c392 user: nat tags: trunk
Changes

Modified tools/sxcat.adb from [009d31e9ec] to [2c25dd919c].

381
382
383
384
385
386
387

388
389
390
391
392
393
394
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395







+







                     raise Constraint_Error;
               end case;
            exception
               when Constraint_Error =>
                  Ada.Text_IO.Put_Line
                    (Ada.Text_IO.Current_Error,
                     "Invalid newline encoding """ & Argument & '"');
                  Handler.Action := Options.Error;
            end;

         when Options.No_Quoted =>
            Param.Quoted := SE.Printers.Pretty.No_Quoted;

         when Options.No_Indent =>
            Param.Indentation := 0;