Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
7
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
Fredrik Wieczerkowski
curry-libs
Commits
15e6b562
Commit
15e6b562
authored
Feb 06, 2020
by
Michael Hanus
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
setEnv/unsetEnv fixed
parent
98291a3d
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
2 additions
and
4 deletions
+2
-4
System/Environment.pakcs.pl
System/Environment.pakcs.pl
+2
-4
No files found.
System/Environment.pakcs.pl
View file @
15e6b562
...
...
@@ -15,13 +15,11 @@
'System.Environment.prim_setEnviron'
(
Var
,
Value
,
'Prelude.()'
)
:-
string2Atom
(
Var
,
AtomVar
),
string2Atom
(
Value
,
AtomValue
),
catch
(
setEnv
(
AtomVar
,
AtomValue
),
_
,
prolog
:
set_system_property
(
AtomVar
,
AtomValue
)).
setEnv
(
AtomVar
,
AtomValue
).
'System.Environment.prim_unsetEnviron'
(
Var
,
'Prelude.()'
)
:-
string2Atom
(
Var
,
AtomVar
),
catch
(
unsetEnv
(
AtomVar
),
_
,
'System.Environment.prim_setEnviron'
(
Var
,[],
'Prelude.()'
)).
unsetEnv
(
AtomVar
).
'System.Environment.getHostname'
(
String
)
:-
getHostname
(
Name
),
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment