Overview
| Comment: | sxcat: also allow 'x' to represent atoms in separator arguments |
|---|---|
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
fafeac7b41f40464305e21822784ca8a |
| User & Date: | nat on 2014-08-07 21:03:41 |
| Other Links: | manifest | tags |
Context
|
2014-08-09
| ||
| 10:37 | s_expressions-atom_buffers: add a capacity accessor check-in: 43ab20ac63 user: nat tags: trunk | |
|
2014-08-07
| ||
| 21:03 | sxcat: also allow 'x' to represent atoms in separator arguments check-in: fafeac7b41 user: nat tags: trunk | |
|
2014-08-04
| ||
| 20:26 | s_expressions-printers-pretty: fix size estimation of verbatim encoding check-in: 87d479c3f0 user: nat tags: trunk | |
Changes
Modified tools/sxcat.adb from [9e7b6d9b79] to [9d7ec778ba].
| ︙ | ︙ | |||
494 495 496 497 498 499 500 |
case C is
when '(' | 'o' | 'O' =>
Entity := SE.Printers.Pretty.Opening;
Valid := True;
when ')' | 'c' | 'C' =>
Entity := SE.Printers.Pretty.Closing;
Valid := True;
| | | 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 |
case C is
when '(' | 'o' | 'O' =>
Entity := SE.Printers.Pretty.Opening;
Valid := True;
when ')' | 'c' | 'C' =>
Entity := SE.Printers.Pretty.Closing;
Valid := True;
when 'a' | 'A' | 'd' | 'D' | 'x' | 'X' =>
Entity := SE.Printers.Pretty.Atom_Data;
Valid := True;
when others =>
Valid := False;
end case;
end Parse;
|
| ︙ | ︙ |
Modified tools/tests.sh from [08f2e47615] to [da12e56c43].
| ︙ | ︙ | |||
204 205 206 207 208 209 210 |
| diff -u "${TMP_EXPT}" -
then
echo "sxcat latin-1 width test failed"
RET_VAL="1"
fi
${BIN_DIR}/sxcat --ext-token --indent 3st --hex-atom --escape-hex \
| | | 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 |
| diff -u "${TMP_EXPT}" -
then
echo "sxcat latin-1 width test failed"
RET_VAL="1"
fi
${BIN_DIR}/sxcat --ext-token --indent 3st --hex-atom --escape-hex \
--no-quoted --no-token --newline ')d,)(,oo,x(' --space 'dd' \
--width 80 --nl cr-lf --unix --lower --dump >"${TMP_DEST}"
if ! ${BIN_DIR}/sxcat --config "${TMP_DEST}" --dump \
| diff -u "${TMP_DEST}" -
then
echo "sxcat configuration reload test failed"
RET_VAL="1"
|
| ︙ | ︙ |