Support opcode 9 (Adjust), Integer in intcode

1 files changed, 2 insertions, 2 deletions

diff --git a/2019/7.hs b/2019/7.hs
index d5910f1..40eaf96 100644
--- a/2019/7.hs
+++ b/2019/7.hs
@@ -7,13 +7,13 @@ import Input
 import IntCode
 
 
-part1 :: [Int] -> Int
+part1 :: [Integer] -> Integer
 part1 program =
     let settings = permutations [0..4]
         outcome setting = foldr (.) id [\i -> head (snd (run program [p,i])) | p <- setting] 0
     in maximum (map outcome settings)
 
-part2 :: [Int] -> Int
+part2 :: [Integer] -> Integer
 part2 program =
     let settings = permutations [5..9]
         outcome setting =