Tag
Hash :
1b03fd70
Author :
Thomas de Grivel
Date :
2023-12-11T19:54:18
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
/* c3
* Copyright 2022,2023 kmx.io <contact@kmx.io>
*
* Permission is hereby granted to use this software granted the above
* copyright notice and this permission paragraph are included in all
* copies and substantial portions of this software.
*
* THIS SOFTWARE IS PROVIDED "AS-IS" WITHOUT ANY GUARANTEE OF
* PURPOSE AND PERFORMANCE. IN NO EVENT WHATSOEVER SHALL THE
* AUTHOR BE CONSIDERED LIABLE FOR THE USE AND PERFORMANCE OF
* THIS SOFTWARE.
*/
#include "env.h"
#include "operator.h"
s8 operator_arity (const s_ident *op)
{
return env_operator_arity(&g_c3_env, op);
}
bool operator_find (const s_ident *op)
{
return env_operator_find(&g_c3_env, op);
}
s_ident * operator_ident (const s_ident *op, s_ident *dest)
{
return env_operator_ident(&g_c3_env, op, dest);
}
bool operator_is_right_associative (const s_ident *op)
{
return env_operator_is_right_associative(&g_c3_env, op);
}
s8 operator_precedence (const s_ident *op)
{
return env_operator_precedence(&g_c3_env, op);
}
s_ident * operator_resolve (const s_ident *op, u8 arity,
s_ident *dest)
{
return env_operator_resolve(&g_c3_env, op, arity, dest);
}
const s_sym * operator_symbol (const s_ident *op)
{
return env_operator_symbol(&g_c3_env, op);
}