Cut the character map down even further.

bwipp · Nov 6, 2024 · 9db3244 · 9db3244
1 parent 13c2f69
commit 9db3244
Showing 1 changed file with 5 additions and 5 deletions.
diff --git a/src/code128.ps.src b/src/code128.ps.src
@@ -92,10 +92,10 @@ begin
     /msglen msg length def
 
     % Character maps for each state
-{   % Include pseudo characters for GS1-128 Composite linkage identifiers -----------------here--v--and--v
-    /seta <<fn3 96 fn2 97 sft 98 swc 99 swb 100 fn4 101 fn1 102 sta 103 stb 104 stc 105 stp 106 lka 100 lkc  99>> def
-    /setb <<fn3 96 fn2 97 sft 98 swc 99 fn4 100 swa 101 fn1 102 sta 103 stb 104 stc 105 stp 106 lka  99 lkc 101>> def
-    /setc <<                            swb 100 swa 101 fn1 102 sta 103 stb 104 stc 105 stp 106 lka 101 lkc 100>> def
+{   % Include pseudo characters for GS1-128 Composite linkage identifiers
+    /seta <<fn3 96 fn2 97 fn1 102 lka 100 lkc  99>> def
+    /setb <<fn3 96 fn2 97 fn1 102 lka  99 lkc 101>> def
+    /setc <<              fn1 102 lka 101 lkc 100>> def
 } ctxdef
 
     raw {/encoding (raw) def} if
@@ -281,7 +281,7 @@ begin
     } for
     /csum csum 103 mod def
     cws j csum put
-    cws j 1 add seta stp get put
+    cws j 1 add 106 put
 
     options /debugcws known { /bwipp.debugcws cws //raiseerror exec } if