Fixed representation of ops with * in them

This commit is contained in:
John Whitington 2020-02-13 10:28:59 +01:00
parent ca49e9d25e
commit 14ccf1dbe1
1 changed files with 5 additions and 5 deletions

View File

@ -53,20 +53,20 @@ let json_of_op pdf no_stream_data = function
| O.Op_s -> J.Array [J.String "s"] | O.Op_s -> J.Array [J.String "s"]
| O.Op_f -> J.Array [J.String "f"] | O.Op_f -> J.Array [J.String "f"]
| O.Op_F -> J.Array [J.String "F"] | O.Op_F -> J.Array [J.String "F"]
| O.Op_f' ->J.Array [J.String "f'"] | O.Op_f' ->J.Array [J.String "f*"]
| O.Op_B -> J.Array [J.String "B"] | O.Op_B -> J.Array [J.String "B"]
| O.Op_B' -> J.Array [J.String "B'"] | O.Op_B' -> J.Array [J.String "B*"]
| O.Op_b -> J.Array [J.String "b"] | O.Op_b -> J.Array [J.String "b"]
| O.Op_b' -> J.Array [J.String "b'"] | O.Op_b' -> J.Array [J.String "b*"]
| O.Op_n -> J.Array [J.String "n"] | O.Op_n -> J.Array [J.String "n"]
| O.Op_W -> J.Array [J.String "W"] | O.Op_W -> J.Array [J.String "W"]
| O.Op_W' -> J.Array [J.String "W'"] | O.Op_W' -> J.Array [J.String "W*"]
| O.Op_BT -> J.Array [J.String "BT"] | O.Op_BT -> J.Array [J.String "BT"]
| O.Op_ET -> J.Array [J.String "ET"] | O.Op_ET -> J.Array [J.String "ET"]
| O.Op_q -> J.Array [J.String "q"] | O.Op_q -> J.Array [J.String "q"]
| O.Op_Q -> J.Array [J.String "Q"] | O.Op_Q -> J.Array [J.String "Q"]
| O.Op_h -> J.Array [J.String "h"] | O.Op_h -> J.Array [J.String "h"]
| O.Op_T' -> J.Array [J.String "T'"] | O.Op_T' -> J.Array [J.String "T*"]
| O.Op_EMC -> J.Array [J.String "EMC"] | O.Op_EMC -> J.Array [J.String "EMC"]
| O.Op_BX -> J.Array [J.String "BX"] | O.Op_BX -> J.Array [J.String "BX"]
| O.Op_EX -> J.Array [J.String "EX"] | O.Op_EX -> J.Array [J.String "EX"]