From 4f31b90a269ec0b2354208f68f473286d4b62666 Mon Sep 17 00:00:00 2001 From: VegOwOtenks Date: Sun, 29 Jun 2025 12:45:45 +0200 Subject: [PATCH] fix[arbitrary]: apply hint (redundant $) --- src/Language/Brainfuck/Instruction.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Language/Brainfuck/Instruction.hs b/src/Language/Brainfuck/Instruction.hs index 80a52aa..ef6d324 100644 --- a/src/Language/Brainfuck/Instruction.hs +++ b/src/Language/Brainfuck/Instruction.hs @@ -21,7 +21,7 @@ data Instruction instance Arbitrary Instruction where arbitrary :: Gen Instruction - arbitrary = Gen.oneof $ + arbitrary = Gen.oneof [ pure Increment , pure Decrement , pure MoveLeft