Significantly extended stdlib

orchid-std/src/macros/ph_lexer.rs

@@ -5,6 +5,7 @@ use orchid_base::interner::{es, is};
 use orchid_base::parse::{name_char, name_start};
 use orchid_extension::atom::Atomic;
 use orchid_extension::atom_thin::{ThinAtom, ThinVariant};
+use orchid_extension::gen_expr::new_atom;
 use orchid_extension::lexer::{LexContext, Lexer, err_not_applicable};
 use orchid_extension::tree::{GenTokTree, x_tok};
 
@@ -72,6 +73,6 @@ impl Lexer for PhLexer {
 			}
 		};
 		let ph_atom = PhAtom(is(name).await.to_api(), phkind);
-		Ok((tail, x_tok(ph_atom).await.at(ctx.pos_tt(line, tail))))
+		Ok((tail, x_tok(new_atom(ph_atom)).await.at(ctx.pos_tt(line, tail))))
 	}
 }