godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Added a local extension: procedure constants

Browse Source
This commit is contained in:
ceriel
1989-03-03 16:13:45 +00:00
parent 9352716e2d
commit f5a2c69481
7 changed files with 25 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lang/m2/comp/node.H
View File

@@ -56,4 +56,4 @@ extern t_node *MkNode(), *MkLeaf(), *dot2node(), *dot2leaf();
#define VALUE 010
#define IsCast(lnd) ((lnd)->nd_class == Def && is_type((lnd)->nd_def))
#define IsProcCall(lnd) ((lnd)->nd_type->tp_fund == T_PROCEDURE)
#define IsProc(lnd) ((lnd)->nd_type->tp_fund == T_PROCEDURE)