Max/kichikuou_xsystem35-sdl2
1
0
Fork 0
mirror of https://github.com/kichikuou/xsystem35-sdl2.git synced 2026-10-05 05:07:58 +03:00
Code Issues Packages Projects Releases Wiki Activity

Refactor variable access code

Browse Source
This commit is contained in:
kichikuou
2021-10-24 14:55:09 +09:00
parent af256b8a83
commit 78cc181271
6 changed files with 97 additions and 147 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/variable.c
+53 -37
View File
@@ -44,6 +44,10 @@ static char **strVar;
int strvar_cnt = STRVAR_MAX;
int strvar_len = STRVAR_LEN;
int preVarPage; /* 直前にアクセスした変数のページ */
int preVarIndex; /* 直前にアクセスした変数のINDEX */
int preVarNo; /* 直前にアクセスした変数の番号 */
static char *advance(const char *s, int n) {
while (*s && n > 0) {
s = advance_char(s, nact->encoding);
@@ -52,6 +56,55 @@ static char *advance(const char *s, int n) {
return (char *)s;
}
int *v_ref(int var) {
arrayVarStruct *attr = &sysVarAttribute[var];
preVarPage = attr->page;
preVarNo = var;
if (attr->page == 0) {
// Normal variable access
preVarIndex = var;
return sysVar + var;
}
// Implicit array access
int *index = attr->pointvar;
int page = attr->page;
int offset = attr->offset;
if (*index + offset >= arrayVarBuffer[page - 1].size) {
WARNING("%03d:%05x: ArrayIndexOutOfBounds (%d, %d, %d, %d)\n", sl_getPage(), sl_getIndex(), var, *index, page, offset);
return NULL;
}
preVarIndex = offset + *index;
return arrayVarBuffer[page - 1].value + offset + *index;
}
int *v_ref_indexed(int var, int index) {
arrayVarStruct *attr = &sysVarAttribute[var];
preVarPage = attr->page;
preVarNo = var;
if (attr->page == 0) {
// If VAR_n is not an array variable, VAR_n[i] points to VAR_(n+i).
if ((var + index) >= SYSVAR_MAX) {
WARNING("%03d:%05x: ArrayIndexOutOfBounds (%d, %d)\n", sl_getPage(), sl_getIndex(), var, index);
return NULL;
}
preVarIndex = var + index;
return sysVar + var + index;
}
// Indexed array access
int page = attr->page;
int offset = attr->offset;
if (offset + index >= arrayVarBuffer[page - 1].size) {
WARNING("%03d:%05x: ArrayIndexOutOfBounds (%d, %d, %d, %d)\n", sl_getPage(), sl_getIndex(), var, index, page, offset);
return NULL;
}
preVarIndex = offset + index;
return arrayVarBuffer[page - 1].value + offset + index;
}
/* 配列バッファの確保 DC ,page = 1~ */
extern boolean v_allocateArrayBuffer(int page, int size, boolean saveflag) {
if (page <= 0 || page > 256) { return false; }
@@ -305,40 +358,3 @@ void svar_replaceAll(int no, int pattern, int replacement) {
svar_append(no, start);
free(src);
}
#ifdef DEBUG
void debug_showvariable() {
int i,j,k;
int *var;
FILE *fp = fopen("VARIABLES.TXT","a");
if (fp == NULL) return;
fprintf(fp, "Page = %d, index = %x\n", sl_getPage(), sl_getIndex());
var = &sysVar[0];
fprintf(fp, "sysVar\n");
for (i = 0; i < SYSVAR_MAX; i+=10) {
for (j = 0; j < 10; j++) {
fprintf(fp, "%d,", *var); var++;
}
fprintf(fp, "\n");
}
for (i = 0; i < ARRAYVAR_PAGEMAX; i++) {
if (arrayVarBuffer[i].value != NULL) {
fprintf(fp, "ArrayPage[%d],size=%d\n",i,arrayVarBuffer[i].size);
var = arrayVarBuffer[i].value;
for (j = 0; j < arrayVarBuffer[i].size; j+=10) {
for (k = 0; k < 10; k++) {
fprintf(fp, "%d,", *var); var++;
}
fprintf(fp, "\n");
}
}
}
fclose(fp);
}
#endif