The key question is "what do you mean by improve"?
I'd start by asking "what are you doing that you will still have to do in
part 2, and what won't you do?"  So looking at part 2, you will want to
convert the lines to integers, and
  input := Array streamContents: [:lines |
    'input.txt' asFileReference readStreamDo: [:in |
      [in atEnd] whileFalse: [lines nextPut: in nextLine asInteger]]].
gives you a chunk of code you can use in both parts.  So you might
want to have

Day1
  changesFrom: aFileName
    ^Array streamContents: [:changes |
      aFileName asFileReference readStreamDo: [:in |
        [in atEnd] whileFalse: [changes nextPut: in nextLine asInteger]]]
  partOne: aFileName
    ^(self changesFrom: aFileName) sum
  partTwo: aFileName
    ...
The file name should not be wired in because you want some test files.

Reply via email to