24 lines
432 B
Racket
24 lines
432 B
Racket
#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))
|
|
|
|
|
|
|