6502/PLASMA
1
0
Fork 0
mirror of https://github.com/dschmenk/PLASMA.git synced 2024-11-01 07:07:48 +00:00
Code Issues Projects Releases Wiki Activity

Better accessed control

Browse Source
This commit is contained in:
David Schmenk 2018-01-03 18:34:20 -08:00
parent cf9f20e0c9
commit eb0c669452
3 changed files with 4 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
src/toolsrc/codegen.c
View File

@ -73,7 +73,11 @@ int idglobal_lookup(char *name, int len)
int i;
for (i = 0; i < globals; i++)
if (id_match(name, len, &(idglobal_name[i][0])))
{
if (idglobal_type[i] & EXTERN_TYPE)
idglobal_type[i] |= ACCESSED_TYPE;
return (i);
}
return (-1);
}
int idconst_add(char *name, int len, int value)
@ -256,17 +260,6 @@ int id_type(char *name, int len)
parse_error("Undeclared identifier");
return (0);
}
int id_access(char *name, int len)
{
int i;
if ((i = idglobal_lookup(name, len)) >= 0)
{
idglobal_type[i] |= ACCESSED_TYPE;
return (idglobal_type[i]);
}
parse_error("Undeclared external function");
return (0);
}
int tag_new(int type)
{
if (type & EXTERN_TYPE)

2
src/toolsrc/parse.c
View File

@ -414,8 +414,6 @@ t_opseq *parse_value(t_opseq *codeseq, int rvalue, int *stackdepth)
{
cfnparms = funcparms_cnt(type);
cfnvals = funcvals_cnt(type);
if (type & EXTERN_TYPE)
id_access(tokenstr, tokenlen);
}
}
else if (scantoken == LAMBDA_TOKEN)

1
src/toolsrc/symbols.h
View File

@ -45,6 +45,5 @@ int idconst_add(char *name, int len, int value);
int id_tag(char *name, int len);
int id_const(char *name, int len);
int id_type(char *name, int len);
int id_access(char *name, int len);
void idglobal_size(int type, int size, int constsize);
int tag_new(int type);