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_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_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_BT -> J.Array [J.String "BT"]
| 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_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_BX -> J.Array [J.String "BX"]
| O.Op_EX -> J.Array [J.String "EX"]