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
#![feature(proc_macro_diagnostic)]
#![deny(clippy::all, clippy::pedantic)]
#![allow(
clippy::empty_enum,
clippy::match_same_arms,
clippy::module_name_repetitions,
clippy::use_self
)]
extern crate proc_macro;
mod ast;
mod cursor;
mod error;
mod sexpr;
mod span;
mod token;
mod parse {
#![allow(clippy::all, clippy::pedantic)]
include!(concat!(env!("OUT_DIR"), "/parse.rs"));
}
use crate::cursor::Cursor;
use crate::error::NoUserError;
use crate::parse::{ExprParser, TypeParser};
use crate::span::Span;
use crate::token::Token;
use lalrpop_util::ParseError;
use proc_macro::{Delimiter, Group, Literal, TokenStream, TokenTree};
use std::iter::{self, FromIterator};
#[proc_macro]
pub fn s_type(input: TokenStream) -> TokenStream {
match TypeParser::new().parse(Cursor::new(input)) {
Ok(t) => string_literal(&t.to_string()),
Err(err) => parse_error(err),
}
}
#[proc_macro]
pub fn s_expr(input: TokenStream) -> TokenStream {
match ExprParser::new().parse(Cursor::new(input)) {
Ok(e) => string_literal(&e.to_string()),
Err(err) => parse_error(err),
}
}
fn string_literal(s: &str) -> TokenStream {
let lit = Literal::string(s);
TokenStream::from_iter(iter::once(TokenTree::Literal(lit)))
}
fn parse_error(err: ParseError<Span, Token, NoUserError>) -> TokenStream {
error::emit(err);
let group = Group::new(Delimiter::Brace, TokenStream::new());
TokenStream::from_iter(iter::once(TokenTree::Group(group)))
}