Update first view
This commit is contained in:
parent
ebfb0c6c87
commit
65e09d2335
7 changed files with 28 additions and 16 deletions
src
|
@ -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
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue