From 646969d4da90b8c52c3b3320b01f26452d786380 Mon Sep 17 00:00:00 2001 From: Krzysztof Gogolewski Date: Thu, 17 Nov 2022 22:47:55 +0100 Subject: Change printing of sized literals to match the proposal Literals in Core were printed as e.g. 0xFF#16 :: Int16#. The proposal 451 now specifies syntax 0xFF#Int16. This change affects the Core printer only - more to be done later. Part of #21422. --- .../tests/simplCore/should_compile/T21960.stderr | 28 +++++++++++----------- 1 file changed, 14 insertions(+), 14 deletions(-) (limited to 'testsuite/tests/simplCore/should_compile/T21960.stderr') diff --git a/testsuite/tests/simplCore/should_compile/T21960.stderr b/testsuite/tests/simplCore/should_compile/T21960.stderr index c129d398eb..6ce8aa0251 100644 --- a/testsuite/tests/simplCore/should_compile/T21960.stderr +++ b/testsuite/tests/simplCore/should_compile/T21960.stderr @@ -153,7 +153,7 @@ encodeUtf8BuilderEscaped [InlPrag=INLINE (sat-args=1)] GHC.Word.W8# r#_a24P } } in case GHC.Word.ltWord8 - w_a1EF (GHC.Word.W8# 128##8) + w_a1EF (GHC.Word.W8# 128#Word8) of { False -> (\ (s_a25B [Occ=Once1] @@ -452,7 +452,7 @@ encodeUtf8BuilderEscaped of r#_a24P { __DEFAULT -> case GHC.Prim.ltWord8# - r#_a24P 128##8 + r#_a24P 128#Word8 of { __DEFAULT -> case GHC.Prim.writeWord8OffAddr# @@ -540,7 +540,7 @@ encodeUtf8BuilderEscaped { __DEFAULT -> case GHC.Prim.ltWord8# r#1_Xr - 128##8 + 128#Word8 of { __DEFAULT -> case GHC.Prim.writeWord8OffAddr# @@ -765,7 +765,7 @@ encodeUtf8BuilderEscaped of r#_a24P { __DEFAULT -> case GHC.Prim.ltWord8# - r#_a24P 128##8 + r#_a24P 128#Word8 of { __DEFAULT -> case GHC.Prim.writeWord8OffAddr# @@ -846,7 +846,7 @@ encodeUtf8BuilderEscaped { __DEFAULT -> case GHC.Prim.ltWord8# r#1_Xr - 128##8 + 128#Word8 of { __DEFAULT -> case GHC.Prim.writeWord8OffAddr# @@ -945,7 +945,7 @@ encodeUtf8BuilderEscaped { __DEFAULT -> case GHC.Prim.ltWord8# r#1_Xr - 128##8 + 128#Word8 of { __DEFAULT -> case GHC.Prim.writeWord8OffAddr# @@ -1208,7 +1208,7 @@ encodeUtf8BuilderEscaped { __DEFAULT -> case GHC.Prim.ltWord8# r#_a24P - 128##8 + 128#Word8 of { __DEFAULT -> case GHC.Prim.writeWord8OffAddr# @@ -1298,7 +1298,7 @@ encodeUtf8BuilderEscaped { __DEFAULT -> case GHC.Prim.ltWord8# r#1_XB - 128##8 + 128#Word8 of { __DEFAULT -> case GHC.Prim.writeWord8OffAddr# @@ -1528,7 +1528,7 @@ encodeUtf8BuilderEscaped { __DEFAULT -> case GHC.Prim.ltWord8# r#_a24P - 128##8 + 128#Word8 of { __DEFAULT -> case GHC.Prim.writeWord8OffAddr# @@ -1611,7 +1611,7 @@ encodeUtf8BuilderEscaped { __DEFAULT -> case GHC.Prim.ltWord8# r#1_XB - 128##8 + 128#Word8 of { __DEFAULT -> case GHC.Prim.writeWord8OffAddr# @@ -1710,7 +1710,7 @@ encodeUtf8BuilderEscaped { __DEFAULT -> case GHC.Prim.ltWord8# r#1_XB - 128##8 + 128#Word8 of { __DEFAULT -> case GHC.Prim.writeWord8OffAddr# @@ -1829,7 +1829,7 @@ encodeUtf8BuilderEscaped case GHC.Prim.indexWord8Array# bx_d22M sc2_s2cL of r#_a24P { __DEFAULT -> - case GHC.Prim.ltWord8# r#_a24P 128##8 of { + case GHC.Prim.ltWord8# r#_a24P 128#Word8 of { __DEFAULT -> case GHC.Prim.writeWord8OffAddr# @GHC.Prim.RealWorld @@ -1884,7 +1884,7 @@ encodeUtf8BuilderEscaped bx_d22M sc5_s2cS of r#1_Xk { __DEFAULT -> - case GHC.Prim.ltWord8# r#1_Xk 128##8 + case GHC.Prim.ltWord8# r#1_Xk 128#Word8 of { __DEFAULT -> case GHC.Prim.writeWord8OffAddr# @@ -1952,7 +1952,7 @@ encodeUtf8BuilderEscaped bx_d22M ww_Xe of r#1_Xk { __DEFAULT -> - case GHC.Prim.ltWord8# r#1_Xk 128##8 + case GHC.Prim.ltWord8# r#1_Xk 128#Word8 of { __DEFAULT -> case GHC.Prim.writeWord8OffAddr# -- cgit v1.2.1