2012-12-03 16:48:01 -08:00
|
|
|
// Copyright 2012 The Rust Project Developers. See the COPYRIGHT
|
|
|
|
// file at the top-level directory of this distribution and at
|
|
|
|
// http://rust-lang.org/COPYRIGHT.
|
|
|
|
//
|
|
|
|
// Licensed under the Apache License, Version 2.0 <LICENSE-APACHE or
|
|
|
|
// http://www.apache.org/licenses/LICENSE-2.0> or the MIT license
|
|
|
|
// <LICENSE-MIT or http://opensource.org/licenses/MIT>, at your
|
|
|
|
// option. This file may not be copied, modified, or distributed
|
|
|
|
// except according to those terms.
|
|
|
|
|
2011-05-04 19:05:16 -07:00
|
|
|
/*
|
2012-10-12 12:32:36 -07:00
|
|
|
* The compiler code necessary to support the env! extension. Eventually this
|
2011-05-04 19:05:16 -07:00
|
|
|
* should all get sucked into either the compiler syntax extension plugin
|
|
|
|
* interface.
|
|
|
|
*/
|
2012-12-23 17:41:37 -05:00
|
|
|
|
2013-02-25 14:11:21 -05:00
|
|
|
use ast;
|
|
|
|
use codemap::span;
|
2012-12-13 13:05:22 -08:00
|
|
|
use ext::base::*;
|
2012-12-23 17:41:37 -05:00
|
|
|
use ext::base;
|
2012-12-13 13:05:22 -08:00
|
|
|
use ext::build::mk_uniq_str;
|
2012-12-23 17:41:37 -05:00
|
|
|
|
2013-03-12 13:00:50 -07:00
|
|
|
pub fn expand_syntax_ext(cx: @ext_ctxt, sp: span, tts: &[ast::token_tree])
|
2013-01-22 16:45:27 -08:00
|
|
|
-> base::MacResult {
|
2012-12-12 17:08:09 -08:00
|
|
|
|
|
|
|
let var = get_single_str_from_tts(cx, sp, tts, "env!");
|
2012-05-14 15:32:32 -07:00
|
|
|
|
2012-06-21 16:44:10 -07:00
|
|
|
// FIXME (#2248): if this was more thorough it would manufacture an
|
2012-08-20 12:23:37 -07:00
|
|
|
// Option<str> rather than just an maybe-empty string.
|
2011-05-06 16:30:39 -07:00
|
|
|
|
2012-12-12 17:08:09 -08:00
|
|
|
let e = match os::getenv(var) {
|
2013-02-24 21:27:51 -08:00
|
|
|
None => mk_uniq_str(cx, sp, ~""),
|
|
|
|
Some(ref s) => mk_uniq_str(cx, sp, copy *s)
|
2012-12-12 17:08:09 -08:00
|
|
|
};
|
2013-01-22 16:45:27 -08:00
|
|
|
MRExpr(e)
|
2011-05-04 19:05:16 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
//
|
|
|
|
// Local Variables:
|
|
|
|
// mode: rust
|
|
|
|
// fill-column: 78;
|
|
|
|
// indent-tabs-mode: nil
|
|
|
|
// c-basic-offset: 4
|
|
|
|
// buffer-file-coding-system: utf-8-unix
|
|
|
|
// End:
|
|
|
|
//
|