Make 'todo.hs' compile and add App datatype