Commit 624ec5a8 authored by johnvg@science.ru.nl's avatar johnvg@science.ru.nl

remove unused function InitARC_Info, move function InitParser from...

remove unused function InitARC_Info, move function InitParser from comparser_2.c to buildtree.c as InitGlobalSymbols
parent 58367b2d
......@@ -11,6 +11,30 @@ SymbolP TrueSymbol, FalseSymbol, TupleSymbol,
SelectSymbols [MaxNodeArity], ApplySymbol, IfSymbol,
TupleTypeSymbols [MaxNodeArity];
void InitGlobalSymbols (void)
{
int i;
for (i = 0; i < MaxNodeArity; i++)
{ SelectSymbols [i] = NULL;
TupleTypeSymbols [i] = NULL;
}
IfSymbol = NewSymbol (if_symb);
TrueSymbol = NewSymbol (bool_denot);
TrueSymbol->symb_bool = True;
FalseSymbol = NewSymbol (bool_denot);
FalseSymbol->symb_bool = False;
TupleSymbol = NewSymbol (tuple_symb);
ApplySymbol = NewSymbol (apply_symb);
ApplySymbol->symb_instance_apply = 0;
clear_p_at_node_tree();
}
TypeArgs
NewTypeArgument (TypeNode pattern)
{
......
extern void InitGlobalSymbols (void);
extern Args NewArgument (NodeP pattern);
extern NodeP NewNode (SymbolP symb, Args args, int arity);
extern NodeP NewIfNode (void);
......
extern DefMod ParseDefMod (char *name, char *importingModule, char *importingExtension, unsigned importingLine);
extern ImpMod ParseImplMod (char *name);
extern void InitParser (void);
# undef H
# include "compiledefines.h"
# include "types.t"
# include "syntaxtr.t"
# include "comsupport.h"
# include "sizes.h"
# include "checker.h"
# include "statesgen.h"
# include "comparser.h"
# include "buildtree.h"
# include "settings.h"
# include "checksupport.h"
void
InitParser (void)
{
int i;
for (i = 0; i < MaxNodeArity; i++)
{ SelectSymbols [i] = NULL;
TupleTypeSymbols [i] = NULL;
}
IfSymbol = NewSymbol (if_symb);
TrueSymbol = NewSymbol (bool_denot);
TrueSymbol->symb_bool = True;
FalseSymbol = NewSymbol (bool_denot);
FalseSymbol->symb_bool = False;
TupleSymbol = NewSymbol (tuple_symb);
ApplySymbol = NewSymbol (apply_symb);
ApplySymbol->symb_instance_apply = 0;
clear_p_at_node_tree();
} /* InitParser */
......@@ -418,7 +418,7 @@ void InitCompiler (void)
CurrentModule = Init;
InitStorage ();
InitParser ();
InitGlobalSymbols();
InitChecker ();
InitStatesGen ();
InitCoding ();
......
#include "compiledefines.h"
#include "types.t"
extern Bool DoShowAttributes;
void InitARC_Info (void)
{
}
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment