Changeset 35164 in project


Ignore:
Timestamp:
02/19/18 22:41:00 (10 months ago)
Author:
kon
Message:

add tests , export software-eol-string , comment about eol seq order

Location:
release/4/posix-utils/trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • release/4/posix-utils/trunk/posix-utils.scm

    r35163 r35164  
    99
    1010(;export
    11   string-trim-eol
     11  string-trim-eol software-eol-string
    1212  environment-variables->environment-list
    1313  environment-variable-bound?
     
    8383      (and
    8484        (fx<= 0 start) (fx< start end)
     85        ;order of multi-char sequences is not imposed !
    8586        (string-index str char-set:software-eol start end))) )
    8687    (if (not index)
  • release/4/posix-utils/trunk/tests/posix-utils-test.scm

    r35149 r35164  
    3030  (test-assert (not (environment-variable-true? "BAR")))
    3131  (test-assert (not (environment-variable-true? "BAZ")))
     32  ;
     33  (test '("A=a" "Z=0") (environment-variables->environment-list '(("A" . a) ("Z" . 0))))
    3234)
    3335
    3436(test-group "shell variables"
    35   (test-assert "OSTYPE (can fail)" (get-shell-variable "OSTYPE"))
     37  (test-assert "OSTYPE" (get-shell-variable "OSTYPE"))
     38  (test-assert "OSTYPE (can fail)" (shell-variable-bound? "OSTYPE"))
    3639)
    3740
Note: See TracChangeset for help on using the changeset viewer.