Skip to content

Instantly share code, notes, and snippets.

@tarquin-the-brave
Created May 12, 2020 13:32
Show Gist options
  • Save tarquin-the-brave/323604ac6863d042c22efcbbbeb9ded3 to your computer and use it in GitHub Desktop.
Save tarquin-the-brave/323604ac6863d042c22efcbbbeb9ded3 to your computer and use it in GitHub Desktop.
data Prog a = Running a | AwaitInput a | End a | Crashed String deriving(Show, Eq)
data Intcode = Intcode {
input::[Int],
code::[Int],
-- ip: Instruction Pointer
ip::Int,
-- rb: Relative Base
rb::Int,
output::[Int]
} deriving(Show, Eq)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment