Commit 3940052f authored by Erick's avatar Erick

Doumentation: get-environment-variable[s]? are now R7RS

parent af7f500b
;; ======================================================================
;;
;; STklos Reference Manual
;; STklos Reference Manual
;;
;; This program is free software; you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
......@@ -18,7 +18,7 @@
;; USA.
;; Author: Erick Gallesio [eg@unice.fr]
;; Creation date: 26-Nov-2000 18:19 (eg)
;; Last file update: 2-Aug-2010 19:14 (eg)
;; Last file update: 21-Sep-2018 09:40 (eg)
;;
;; ======================================================================
......@@ -252,7 +252,7 @@ running Scheme programs as Unix scripts in a uniform
way. Specifically, it describes: ,(itemize
(item [the syntax of Unix scripts written in Scheme,])
(item [a uniform convention for calling the Scheme script interpreter,
and])
and])
(item [a method for accessing the Unix command line arguments from
within the Scheme script.]))])
......@@ -430,19 +430,19 @@ figure ,(ref :figure "Feature identifiers") in a
(figure :legend "Feature identifiers"
(center
(table :rules 'cols :frame 'border :width 60.
(tr :bg "#eeeeee" (th "Symbol") (th "require SRFI(s)"))
(tr (tdl "lists") (tdl "srfi-1"))
(tr (tdl "and-let*") (tdl "srfi-2"))
(tr (tdl "hvectors") (tdl "srfi-4"))
(tr (tdl "program") (tdl "srfi-7"))
(tr (tdl "records") (tdl "srfi-9"))
(tr (tdl "strings") (tdl "srfi-13"))
(tr (tdl "charsets") (tdl "srfi-14"))
(tr (tdl "case-lambda") (tdl "srfi-16"))
(tr (tdl "error") (tdl "srfi-23"))
(tr (tdl "random") (tdl "srfi-27"))
(tr (tdl "conditions") (tdl "srfi-34, srfi-35, srfi-36"))
(tr (tdl "hash-tables") (tdl "srfi-69"))))))
(tr :bg "#eeeeee" (th "Symbol") (th "require SRFI(s)"))
(tr (tdl "lists") (tdl "srfi-1"))
(tr (tdl "and-let*") (tdl "srfi-2"))
(tr (tdl "hvectors") (tdl "srfi-4"))
(tr (tdl "program") (tdl "srfi-7"))
(tr (tdl "records") (tdl "srfi-9"))
(tr (tdl "strings") (tdl "srfi-13"))
(tr (tdl "charsets") (tdl "srfi-14"))
(tr (tdl "case-lambda") (tdl "srfi-16"))
(tr (tdl "error") (tdl "srfi-23"))
(tr (tdl "random") (tdl "srfi-27"))
(tr (tdl "conditions") (tdl "srfi-34, srfi-35, srfi-36"))
(tr (tdl "hash-tables") (tdl "srfi-69"))))))
;; ----------------------------------------------------------------------
;; SRFI 59 -- Vicinity
......@@ -557,7 +557,8 @@ you need to insert the following expression])
(p [,(quick-link-srfi 96) is fully supported and is completely
described in this document (procedures
,(code "get-environment-variable"), and
,(code "get-environment-variables")). ]))
,(code "get-environment-variables")). ]
(p [Note that both primitives are now defined in ,(rseven).])))
;; ----------------------------------------------------------------------
......
......@@ -18,7 +18,7 @@
;; USA.
;; Author: Erick Gallesio [eg@unice.fr]
;; Creation date: 26-Nov-2000 18:19 (eg)
;; Last file update: 11-Sep-2018 10:13 (eg)
;; Last file update: 21-Sep-2018 09:38 (eg)
;;
;; ======================================================================
......@@ -687,7 +687,14 @@ be accessed as a normal port with the standard Scheme primitives.])
(subsection :title "Environment"
(insertdoc 'getenv)
(insertdoc 'setenv!)
(insertdoc 'unsetenv!))
(insertdoc 'unsetenv!)
,(stklos) defines also the ,(rseven) (and ,(quick-link-srfi 96)))
standard primivitives to acess environment variables.
(insertdoc 'get-environment-variable)
(insertdoc 'get-environment-variables)
)
;;; Time
(subsection :title "Time"
......
......@@ -21,7 +21,7 @@
;;;;
;;;; Author: Erick Gallesio [eg@unice.fr]
;;;; Creation date: 14-Jun-2000 17:24 (eg)
;;;; Last file update: 24-Aug-2018 15:20 (eg)
;;;; Last file update: 21-Sep-2018 09:32 (eg)
;;;;
......@@ -1667,7 +1667,7 @@ doc>
;; SRFI-98: "An interface to access environment variables"
;;
#| <doc EXT get-environment-variable
#| <doc R7RS get-environment-variable
* (get-environment-variable name)
*
* Returns the value of the named environment variable as a string, or
......@@ -1678,7 +1678,7 @@ doc>
(define (get-environment-variable name)
(getenv name))
#| <doc EXT get-environment-variables
#| <doc R7RS get-environment-variables
* (get-environment-variables)
*
* Returns names and values of all the environment variables as an a-list.
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment