Add missing doc strings in environment

* geesh/environment.scm (var-ref): Add doc string.
(set-var!): Add doc string.
This commit is contained in:
Timothy Sample 2018-07-16 22:45:29 -04:00
parent b9ec924bbe
commit da1746f2d6
1 changed files with 3 additions and 0 deletions

View File

@ -46,9 +46,12 @@
vars)))
(define (var-ref env name)
"Get the value of the variable @var{name} in @var{env}. If
@var{name} is unset, return @code{#f}."
(assoc-ref (environment-vars env) name))
(define (set-var! env name val)
"Set the variable @var{name} to @var{val} in @var{env}."
(set-environment-vars! env (acons name val
(environment-vars env))))