[Racket] Ferti hydroponic nutrient solver, redux.
Add exception handling at the top level function.
main.rkt
@@ -9,7 +9,11 @@
9
9
10
10
(define-runtime-path development-db-path "storage/development.sqlite3")
11
11
(module+ main
12
Removed:
(connect! #:path development-db-path)
13
Removed:
(migrate-all!)
14
Removed:
(seed-database!)
15
Removed:
(serve/dispatch app-dispatch))
12
Added:
(with-handlers ([exn:fail?
13
Added:
(λ (e)
14
Added:
(printf "Startup error: ~a\n" (exn-message e))
15
Added:
(exit 1))])
16
Added:
(connect! #:path development-db-path)
17
Added:
(migrate-all!)
18
Added:
(seed-database!)
19
Added:
(serve/dispatch app-dispatch)))