From d77a418f3d3575bf9bcb2c71c1ce8b178b916c01 Mon Sep 17 00:00:00 2001 From: Arnaud Bailly Date: Sun, 2 Nov 2025 18:21:37 +0100 Subject: fix order of completion --- lambda-calcul/haskell/test/Minilang/REPL/HaskelineSpec.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'lambda-calcul/haskell/test/Minilang') diff --git a/lambda-calcul/haskell/test/Minilang/REPL/HaskelineSpec.hs b/lambda-calcul/haskell/test/Minilang/REPL/HaskelineSpec.hs index b9ec59c..1b0f600 100644 --- a/lambda-calcul/haskell/test/Minilang/REPL/HaskelineSpec.hs +++ b/lambda-calcul/haskell/test/Minilang/REPL/HaskelineSpec.hs @@ -1,5 +1,6 @@ module Minilang.REPL.HaskelineSpec where +import Data.List (sort) import Minilang.REPL.Haskeline import System.Console.Haskeline.Completion import Test.Hspec @@ -24,7 +25,7 @@ spec = parallel $ describe "MiniLang Haskeline REPL" $ describe "Completion" $ d `shouldReturn` [":unset step", ":unset debug"] it "returns list of files when input ':load' " $ - fmap replacement . snd <$> completion ("daol:", "") + sort . fmap replacement . snd <$> completion ("daol:", "") `shouldReturn` [":load bool.lisp", ":load fac.lisp"] it "returns filtered list of files when input ':load xxx' " $ -- cgit v1.3.1