6 lines
177 B
Text
6 lines
177 B
Text
import system.io
|
|
|
|
|
|
#eval do
|
|
res ← io.cmd {cmd := "printenv", args := ["foo"], env := [("foo", "bar")]},
|
|
when (res ≠ "bar\n") $ io.fail $ "unexpected value for foo: " ++ res
|