neutralts/bif/
parse_bif_eval.rs

1#![doc = include_str!("../../doc/bif-eval.md")]
2
3use crate::{bif::constants::*, bif::Bif, bif::BifError, constants::*};
4
5impl<'a> Bif<'a> {
6    /*
7        {:eval; code >> ... {:;__eval__:} ... :} {:* embbedding *:}
8    */
9    pub(crate) fn parse_bif_eval(&mut self) -> Result<(), BifError> {
10        if self.mod_filter {
11            return Err(self.bif_error(BIF_ERROR_MODIFIER_NOT_ALLOWED));
12        }
13
14        self.extract_params_code(false);
15
16        if self.params.contains("{:flg;") {
17            return Err(self.bif_error(BIF_ERROR_FLAGS_NOT_ALLOWED));
18        }
19
20        if self.params.contains(BIF_OPEN) {
21            self.params = new_child_parse!(self, &self.params, self.mod_scope);
22        }
23
24        if (self.params != EMPTY_STRING) ^ self.mod_negate {
25            if self.code.contains(BIF_OPEN) {
26                let restore_eval = self.get_data("__eval__");
27                self.set_data("__eval__", &self.params.clone());
28                self.code = new_child_parse!(self, &self.code, self.mod_scope);
29                self.set_data("__eval__", &restore_eval);
30            }
31            self.out = self.code.clone();
32        } else {
33            self.out = EMPTY_STRING;
34        }
35
36        Ok(())
37    }
38}
39
40#[cfg(test)]
41#[path = "parse_bif_eval_tests.rs"]
42mod tests;
neutralts/bif/parse_bif_eval.rs

neutralts/bif/
parse_bif_eval.rs
