Flaky tests: screen content truncated in check_section_text

[spalmer25]

https://github.com/trilitech/ledger-app-tezos-wallet/actions/runs/6428743058/attempts/1?pr=46
https://github.com/trilitech/ledger-app-tezos-wallet/actions/runs/6428743058/attempts/2?pr=46
https://github.com/trilitech/ledger-app-tezos-wallet/actions/runs/6428743058?pr=46

Here are the relevant logs:
While parsing 40FE546))) (Pair (Pair (Some 404988713393468332562695) (Some (Pair (Right None) (Pair {Some (Right (Pair (Left Unit) None));Some (Right (Pair (Left Unit) (Some (Pair Unit -1813259358534234854689511180790421968089022))));Some (Ri...91968452)}:

- press right
- title=\"Expression\" Text=[40FE546))) (Pair (P, air (Some 404988713, 393468332562695) (S, ome (Pair (Right No] -
l: 40FE546))) (Pair (P, c: 40FE546))) (Pair (P
l: air (Some 404988713, c: air (Some 404988713
l: 393468332562695) (S, c: 393468332562695) (S
l: ome (Pair (Right No, c: ome (Pair (Right No
- press right
- title=\"Expression\" Text=[40FE546))) (Pair (P, air (Some 404988713, 393468332562695) (S, ome (Pair (Right No] -
l: 40FE546))) (Pair (P, c: ne) (Pair {Some (Ri
- retrying: title=\"Expression\" Text=[40FE546))) (Pair (P, air (Some 404988713, 393468332562695) (S, ome (Pair (Right No] did not match ne) (Pair ...91968452)}
- title=\"Expression\" Text=[40FE546))) (Pair (P, air (Some 404988713, 393468332562695) (S, ome (Pair (Right No] -
l: 40FE546))) (Pair (P, c: ne) (Pair {Some (Ri
- retrying: title=\"Expression\" Text=[40FE546))) (Pair (P, air (Some 404988713, 393468332562695) (S, ome (Pair (Right No] did not match ne) (Pair ...91968452)}
- title=\"Expression\" Text=[ne) (Pair {Some (Ri] -
l: ne) (Pair {Some (Ri, c: ne) (Pair {Some (Ri
- press right
- title=\"Expression\" Text=[) (Some (Pair Unit , -181325935853423485, 4689511180790421968, 089022))));Some (Ri] -
l: ) (Some (Pair Unit , c: ght (Pair (Left Uni
- retrying: title=\"Expression\" Text=[) (Some (Pair Unit , -181325935853423485, 4689511180790421968, 089022))));Some (Ri] did not match ght (Pair ...91968452)}
- title=\"Expression\" Text=[) (Some (Pair Unit , -181325935853423485, 4689511180790421968, 089022))));Some (Ri] -
l: ) (Some (Pair Unit , c: ght (Pair (Left Uni
- retrying: title=\"Expression\" Text=[) (Some (Pair Unit , -181325935853423485, 4689511180790421968, 089022))));Some (Ri] did not match ght (Pair ...91968452)}

While parsing air (Right (Pair (Right (Right None)) (Right (Some 3425716575765189005)))) 0x00F79002BDEB2A50A6BACBDBDA7D7703A1EBE7CD94) {};Elt (Pair (Right (Pair (Right (Right (Some Unit))) (Left Unit))) 0x0064329CD802B1BF3C9F708DD7A3A44EA59C0B5CF9) {Right Unit;Left None}}

- press right
- title=\"Expression\" Text=[air (Right (Pair (R, ight (Right None)) , (Right (Some 342571, 6575765189005)))) 0] -
l: air (Right (Pair (R, c: air (Right (Pair (R
l: ight (Right None)) , c: ight (Right None)) 
l: (Right (Some 342571, c: (Right (Some 342571
l: 6575765189005)))) 0, c: 6575765189005)))) 0
- press right
- title=\"Expression\" Text=[air (Right (Pair (R, ight (Right None)) , (Right (Some 342571, 6575765189005)))) 0] -
l: air (Right (Pair (R, c: air (Right (Pair (R
l: ight (Right None)) , c: ight (Right None)) 
l: (Right (Some 342571, c: (Right (Some 342571
l: 6575765189005)))) 0, c: 6575765189005)))) 0
- press right
- title=\"Expression\" Text=[air (Right (Pair (R, ight (Right None)) , (Right (Some 342571, 6575765189005)))) 0] -
l: air (Right (Pair (R, c: x00F79002BDEB2A50A6
- retrying: title=\"Expression\" Text=[air (Right (Pair (R, ight (Right None)) , (Right (Some 342571, 6575765189005)))) 0] did not match x00F79002B...eft None}}
- title=\"Expression\" Text=[air (Right (Pair (R, ight (Right None)) , (Right (Some 342571, 6575765189005)))) 0] -
l: air (Right (Pair (R, c: x00F79002BDEB2A50A6
- retrying: title=\"Expression\" Text=[air (Right (Pair (R, ight (Right None)) , (Right (Some 342571, 6575765189005)))) 0] did not match x00F79002B...eft None}}
- title=\"Expression\" Text=[] -
- press right
- title=\"Expression\" Text=[ht (Right (Some Uni, t))) (Left Unit))) , 0x0064329CD802B1BF3, C9F708DD7A3A44EA59C] -
l: ht (Right (Some Uni, c: x00F79002BDEB2A50A6
- retrying: title=\"Expression\" Text=[ht (Right (Some Uni, t))) (Left Unit))) , 0x0064329CD802B1BF3, C9F708DD7A3A44EA59C] did not match x00F79002B...eft None}}
- title=\"Expression\" Text=[ht (Right (Some Uni, t))) (Left Unit))) , 0x0064329CD802B1BF3, C9F708DD7A3A44EA59C] -
l: ht (Right (Some Uni, c: x00F79002BDEB2A50A6
- retrying: title=\"Expression\" Text=[ht (Right (Some Uni, t))) (Left Unit))) , 0x0064329CD802B1BF3, C9F708DD7A3A44EA59C] did not match x00F79002B...eft None}}