From 1a583e55bddab7b2146a7a3bfb51e7fcda87608b Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Fri, 11 Jun 2021 07:33:39 -0700 Subject: pic: clarification and tests. * tests/018/format.tl: Add tests which combine overflow flagging with +/-. The space generated by - contributes to overflow. * txr.1: Clarify overflow issue in documentation. --- tests/018/format.tl | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'tests/018/format.tl') diff --git a/tests/018/format.tl b/tests/018/format.tl index d1038c30..23f4cc63 100644 --- a/tests/018/format.tl +++ b/tests/018/format.tl @@ -108,6 +108,12 @@ (pic "#!#" 123) "###" (pic "#.#" 123) "123.0") +(mtest + (pic "-##!#" 12) " 12.0" + (pic "+##!#" 12) "+12.0" + (pic "-##!#" -123) "#####" + (pic "+##!#" 123) "#####") + (mtest (pic "X##.#Y<<>>W" 1 2 3) "X 1.0Y2 Z 3W" (pic "~###.#~#<<<~#>>>~#" 1 2 3) "# 1.0#2 # 3#") -- cgit v1.2.3