advent-23-racket/main.rkt

24 lines
432 B
Racket
Raw Normal View History

2023-12-03 00:25:35 +00:00
#lang racket
; import all days
(require "src/day01.rkt")
2023-12-03 00:32:58 +00:00
(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)))
2023-12-03 00:25:35 +00:00
(define argv (current-command-line-arguments))
(define argc (vector-length argv))
2023-12-03 00:25:35 +00:00
; If no arguments are provided, run all solutions from all days
; on the real inputs
2023-12-03 00:25:35 +00:00
(when (= argc 0)
(run-all)
(exit 1))
2023-12-03 00:25:35 +00:00