blob: 296718daeca071ff3baad696e96570b70ad88704 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
GenericTemplate.hs:219:14: Warning:
Pattern bindings containing unlifted types should use an outermost bang pattern:
sts1@((HappyCons (st1@(action)) (_)))
= happyDrop k (HappyCons (st) (sts))
In an equation for `happyMonadReduce':
happyMonadReduce k nt fn j tk st sts stk
= happyThen1
(fn stk tk)
(\ r -> happyGoto nt j tk st1 sts1 (r `HappyStk` drop_stk))
where
sts1@((HappyCons (st1@(action)) (_)))
= happyDrop k (HappyCons (st) (sts))
drop_stk = happyDropStk k stk
GenericTemplate.hs:226:14: Warning:
Pattern bindings containing unlifted types should use an outermost bang pattern:
sts1@((HappyCons (st1@(action)) (_)))
= happyDrop k (HappyCons (st) (sts))
In an equation for `happyMonad2Reduce':
happyMonad2Reduce k nt fn j tk st sts stk
= happyThen1
(fn stk tk)
(\ r -> happyNewToken new_state sts1 (r `HappyStk` drop_stk))
where
sts1@((HappyCons (st1@(action)) (_)))
= happyDrop k (HappyCons (st) (sts))
drop_stk = happyDropStk k stk
off = indexShortOffAddr happyGotoOffsets st1
off_i = (off +# nt)
....
|
