1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
|
/*
* MRustC - Rust Compiler
* - By John Hodge (Mutabah/thePowersGang)
*
* expand/rustc_diagnostics.cpp
* - Stubbed handling for __register_diagnostic and __diagnostic_used
*/
#include <synext.hpp>
#include <parse/parseerror.hpp> // For GET_CHECK_TOK
#include <parse/common.hpp> // TokenTree etc
#include <parse/ttstream.hpp>
class CExpanderRegisterDiagnostic:
public ExpandProcMacro
{
::std::unique_ptr<TokenStream> expand(const Span& sp, const AST::Crate& crate, const ::std::string& ident, const TokenTree& tt, AST::Module& mod) override
{
return box$( TTStreamO(TokenTree()) );
}
};
class CExpanderDiagnosticUsed:
public ExpandProcMacro
{
::std::unique_ptr<TokenStream> expand(const Span& sp, const AST::Crate& crate, const ::std::string& ident, const TokenTree& tt, AST::Module& mod) override
{
return box$( TTStreamO(TokenTree()) );
}
};
class CExpanderBuildDiagnosticArray:
public ExpandProcMacro
{
::std::unique_ptr<TokenStream> expand(const Span& sp, const AST::Crate& crate, const ::std::string& ident, const TokenTree& tt, AST::Module& mod) override
{
if( ident != "" )
ERROR(sp, E0000, "__build_diagnostic_array! doesn't take an ident");
auto lex = TTStream(tt);
Token tok;
GET_CHECK_TOK(tok, lex, TOK_IDENT);
//auto crate_name = mv$(tok.str());
GET_CHECK_TOK(tok, lex, TOK_COMMA);
GET_CHECK_TOK(tok, lex, TOK_IDENT);
auto item_name = mv$(tok.str());
GET_CHECK_TOK(tok, lex, TOK_EOF);
::std::vector<TokenTree> toks;
toks.push_back( TOK_RWORD_STATIC );
toks.push_back( Token(TOK_IDENT, item_name) );
// : [(&'static str, &'static str); 0]
toks.push_back( TOK_COLON );
toks.push_back( TOK_SQUARE_OPEN );
toks.push_back( TOK_PAREN_OPEN );
toks.push_back( TOK_AMP ); toks.push_back( Token(TOK_LIFETIME, "static") ); toks.push_back( Token(TOK_IDENT, "str") );
toks.push_back( TOK_COMMA );
toks.push_back( TOK_AMP ); toks.push_back( Token(TOK_LIFETIME, "static") ); toks.push_back( Token(TOK_IDENT, "str") );
toks.push_back( TOK_PAREN_CLOSE );
toks.push_back( TOK_SEMICOLON );
toks.push_back( Token(static_cast<uint64_t>(0), CORETYPE_UINT) );
toks.push_back( TOK_SQUARE_CLOSE );
// = [];
toks.push_back( TOK_EQUAL );
toks.push_back( TOK_SQUARE_OPEN );
toks.push_back( TOK_SQUARE_CLOSE );
toks.push_back( TOK_SEMICOLON );
return box$( TTStreamO(TokenTree( lex.getHygiene(), mv$(toks) )) );
}
};
STATIC_MACRO("__register_diagnostic", CExpanderRegisterDiagnostic)
STATIC_MACRO("__diagnostic_used", CExpanderDiagnosticUsed)
STATIC_MACRO("__build_diagnostic_array", CExpanderBuildDiagnosticArray)
|
