Update first view

This commit is contained in:
Akira Tempaku 2024-11-17 22:18:59 +09:00
commit 65e09d2335
7 changed files with 28 additions and 16 deletions

View file

@ -7,7 +7,7 @@
(in-package #:hp/env)
(defmacro defenv (name env &key default parser)
(let ((env-val (gensym "val")))
(let ((env-val (gensym "env-val")))
`(defparameter ,name
(let ((,env-val (uiop:getenv ,env)))
(if ,env-val