Skip to content

Instantly share code, notes, and snippets.

@taw10
Created May 21, 2022 21:58
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save taw10/8689dc4b5330f42ac682cbe93546c306 to your computer and use it in GitHub Desktop.
Save taw10/8689dc4b5330f42ac682cbe93546c306 to your computer and use it in GitHub Desktop.
Guile 3.0.7 getenv test
[23:56] ~ $ cat env-test.scm
(format #t "COLUMNS: ~a\n"
(getenv "COLUMNS"))
[23:56] ~ $ guile env-test.scm
COLUMNS: #f
[23:56] ~ $ guile
;;; note: source file /usr/local/share/guile/3.0/system/repl/debug.scm
;;; newer than compiled /usr/local/lib/guile/3.0/ccache/system/repl/debug.go
;;; found fresh local cache at /home/taw/.cache/guile/ccache/3.0-LE-8-4.5/usr/local/share/guile/3.0/system/repl/debug.scm.go
GNU Guile 3.0.7
Copyright (C) 1995-2021 Free Software Foundation, Inc.
Guile comes with ABSOLUTELY NO WARRANTY; for details type `,show w'.
This program is free software, and you are welcome to redistribute it
under certain conditions; type `,show c' for details.
Enter `,help' for help.
scheme@(guile-user)> (load "env-test.scm")
COLUMNS: 116
$1 = #t
scheme@(guile-user)>
[23:56] ~ $ guile -l env-test.scm
;;; note: source file /usr/local/share/guile/3.0/system/repl/debug.scm
;;; newer than compiled /usr/local/lib/guile/3.0/ccache/system/repl/debug.go
;;; found fresh local cache at /home/taw/.cache/guile/ccache/3.0-LE-8-4.5/usr/local/share/guile/3.0/system/repl/debug.scm.go
COLUMNS: #f
GNU Guile 3.0.7
Copyright (C) 1995-2021 Free Software Foundation, Inc.
Guile comes with ABSOLUTELY NO WARRANTY; for details type `,show w'.
This program is free software, and you are welcome to redistribute it
under certain conditions; type `,show c' for details.
Enter `,help' for help.
scheme@(guile-user)> (load "env-test.scm")
COLUMNS: 116
$1 = #t
scheme@(guile-user)> (getenv "COLUMNS")
$2 = "116"
scheme@(guile-user)>
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment