mirror of
https://gitlab.alpinelinux.org/alpine/aports.git
synced 2025-07-21 18:25:41 +03:00
22 lines
785 B
Diff
22 lines
785 B
Diff
From 84b29475e057ef744f32a94bc0d3954b84160760 Mon Sep 17 00:00:00 2001
|
|
From: Vaibhav Sagar <vaibhavsagar@gmail.com>
|
|
Date: Sun, 25 Apr 2021 00:48:56 +1000
|
|
Subject: [PATCH] tests/default_typeclass.x: remove spaces around as-pattern
|
|
|
|
---
|
|
tests/default_typeclass.x | 2 +-
|
|
1 file changed, 1 insertion(+), 1 deletion(-)
|
|
|
|
diff --git a/tests/default_typeclass.x b/tests/default_typeclass.x
|
|
index 5491e28..76ac35a 100644
|
|
--- a/tests/default_typeclass.x
|
|
+++ b/tests/default_typeclass.x
|
|
@@ -133,7 +133,7 @@ alexSetInput (pos, c, bs, inp) =
|
|
alexError :: (MonadState AlexState m, Read s) => String -> m (Token s)
|
|
alexError message =
|
|
do
|
|
- s @ AlexState { alex_errs = errs } <- get
|
|
+ s@AlexState { alex_errs = errs } <- get
|
|
put s { alex_errs = message : errs }
|
|
alexMonadScan
|
|
|