From ca405d05a2c4316f788a6a465a471f8620da8ce6 Mon Sep 17 00:00:00 2001 From: =?utf8?q?J=C3=A9r=C3=A9mie=20Astor?= Date: Sun, 13 Sep 2020 22:49:38 +0200 Subject: [PATCH] :art: Allow OPID_D --- src/parse/scan1.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/parse/scan1.c b/src/parse/scan1.c index 9f2c0056..83a7d087 100644 --- a/src/parse/scan1.c +++ b/src/parse/scan1.c @@ -145,7 +145,8 @@ ANN m_bool scan1_exp_decl(const Env env, const Exp_Decl* decl) { ANN static inline int opiscall(const Symbol sym) { const m_str opname = s_name(sym); - return opname[0] == '@' && (isalpha(opname[1]) || opname[1] == '_'); + return (opname[0] == '@' || opname[0] == '$') && + (isalpha(opname[1]) || opname[1] == '_'); } ANN static inline Exp sym2func(const Env env, const Symbol sym, const loc_t pos) { -- 2.43.0