// 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.

use core::prelude::*;

use ast;
use codemap::span;
use ext::base::ext_ctxt;
use ext::base;
use parse::lexer::{new_tt_reader, reader};
use parse::parser::Parser;

pub fn expand_trace_macros(cx: ext_ctxt, sp: span,
                           tt: &[ast::token_tree]) -> base::MacResult {
    let sess = cx.parse_sess();
    let cfg = cx.cfg();
    let tt_rdr = new_tt_reader(
        copy cx.parse_sess().span_diagnostic,
        cx.parse_sess().interner,
        None,
        vec::from_slice(tt)
    );
    let rdr = tt_rdr as reader;
    let rust_parser = Parser(
        sess,
        copy cfg,
        rdr.dup()
    );

    if rust_parser.is_keyword(&~"true") {
        cx.set_trace_macros(true);
    } else if rust_parser.is_keyword(&~"false") {
        cx.set_trace_macros(false);
    } else {
        cx.span_fatal(sp, ~"trace_macros! only accepts `true` or `false`")
    }

    rust_parser.bump();

    let rust_parser = Parser(sess, cfg, rdr.dup());
    let result = rust_parser.parse_expr();
    base::MRExpr(result)
}