1 # This file is part of NIT ( http://www.nitlanguage.org ).
3 # Copyright 2006 Floréal Morandat <morandat@lirmm.fr>
4 # Copyright 2008 Jean Privat <jean@pryen.org>
6 # This file is free software, which comes along with NIT. This software is
7 # distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY;
8 # without even the implied warranty of MERCHANTABILITY or FITNESS FOR A
9 # PARTICULAR PURPOSE. You can modify it is you want, provided this header
10 # is kept unaltered, and a notification of the changes is added.
11 # You are allowed to redistribute it and sell it, alone or is a part of
16 # TODO prevoir une structure pour recup tout un environ, le modifier et le passer a process
19 # Return environement valued for this symbol
22 var res
= to_s
.to_cstring
.get_environ
23 # FIXME: There is no proper way to handle NULL C string yet. What a pitty.
24 var nulstr
= once
("".to_cstring
.get_environ
)
26 return new String.from_cstring
(res
)
33 redef class NativeString
34 # Refinned to add environement bindings
35 private fun get_environ
: NativeString is extern "string_NativeString_NativeString_get_environ_0"