From da1746f2d6b662243d72c46ed9d60cec5578d1e5 Mon Sep 17 00:00:00 2001
From: Timothy Sample <samplet@ngyro.com>
Date: Mon, 16 Jul 2018 22:45:29 -0400
Subject: [PATCH] Add missing doc strings in environment

* geesh/environment.scm (var-ref): Add doc string.
(set-var!): Add doc string.
---
 geesh/environment.scm | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/geesh/environment.scm b/geesh/environment.scm
index 48f72fd..027252d 100644
--- a/geesh/environment.scm
+++ b/geesh/environment.scm
@@ -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))))