#lang racket ; import all days (require "src/day01.rkt") (define (run-all) (printf "Running all solutions") (define result-01-p1 (advent-of-code-01-p1)) (printf (string-append "Day 1 part 1: " result-01-p1))) (define argv (current-command-line-arguments)) (define argc (vector-length argv)) ; If no arguments are provided, run all solutions from all days ; on the real inputs (when (= argc 0) (run-all) (exit 1))