| Line |
Branch |
Exec |
Source |
| 1 |
|
|
#include "libstr.h" |
| 2 |
|
|
#include "asar.h" |
| 3 |
|
|
#include "autoarray.h" |
| 4 |
|
|
#include "assocarr.h" |
| 5 |
|
|
#include "errors.h" |
| 6 |
|
|
#include "assembleblock.h" |
| 7 |
|
|
#include "macro.h" |
| 8 |
|
|
#include "asar_math.h" |
| 9 |
|
|
#include "warnings.h" |
| 10 |
|
|
|
| 11 |
|
|
assocarr<macrodata*> macros; |
| 12 |
|
|
static string thisname; |
| 13 |
|
|
static macrodata * thisone; |
| 14 |
|
|
static int numlines; |
| 15 |
|
|
|
| 16 |
|
|
int calledmacros; |
| 17 |
|
|
int reallycalledmacros; |
| 18 |
|
|
int macrorecursion; |
| 19 |
|
|
bool inmacro; |
| 20 |
|
|
int numvarargs; |
| 21 |
|
|
|
| 22 |
|
|
macrodata* current_macro; |
| 23 |
|
|
const char* const* current_macro_args; |
| 24 |
|
|
int current_macro_numargs; |
| 25 |
|
|
|
| 26 |
|
52 |
void startmacro(const char * line_) |
| 27 |
|
|
{ |
| 28 |
|
52 |
thisone= nullptr; |
| 29 |
2/6
✓ Branch 0 taken 52 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 52 times.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
|
52 |
if (!confirmqpar(line_)) asar_throw_error(0, error_type_block, error_id_broken_macro_declaration); |
| 30 |
1/2
✓ Branch 0 taken 52 times.
✗ Branch 1 not taken.
|
52 |
string line=line_; |
| 31 |
5/10
✓ Branch 0 taken 52 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 52 times.
✗ Branch 3 not taken.
✓ Branch 4 taken 52 times.
✗ Branch 5 not taken.
✓ Branch 6 taken 52 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 52 times.
✗ Branch 9 not taken.
|
52 |
clean_and_trim(line); |
| 32 |
|
52 |
char * startpar=strqchr(line.data(), '('); |
| 33 |
1/4
✗ Branch 0 not taken.
✓ Branch 1 taken 52 times.
✗ Branch 2 not taken.
✗ Branch 3 not taken.
|
52 |
if (!startpar) asar_throw_error(0, error_type_block, error_id_broken_macro_declaration); |
| 34 |
|
52 |
*startpar=0; |
| 35 |
|
52 |
startpar++; |
| 36 |
2/6
✓ Branch 0 taken 52 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 52 times.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
|
52 |
if (!confirmname(line)) asar_throw_error(0, error_type_block, error_id_invalid_macro_name); |
| 37 |
1/2
✓ Branch 0 taken 52 times.
✗ Branch 1 not taken.
|
52 |
thisname=line; |
| 38 |
|
52 |
char * endpar=strqrchr(startpar, ')'); |
| 39 |
|
|
//confirmqpar requires that all parentheses are matched, and a starting one exists, therefore it is harmless to not check for nullptrs |
| 40 |
1/4
✗ Branch 0 not taken.
✓ Branch 1 taken 52 times.
✗ Branch 2 not taken.
✗ Branch 3 not taken.
|
52 |
if (endpar[1]) asar_throw_error(0, error_type_block, error_id_broken_macro_declaration); |
| 41 |
|
52 |
*endpar=0; |
| 42 |
2/2
✓ Branch 0 taken 220 times.
✓ Branch 1 taken 52 times.
|
272 |
for (int i=0;startpar[i];i++) |
| 43 |
|
|
{ |
| 44 |
|
220 |
char c=startpar[i]; |
| 45 |
8/12
✓ Branch 0 taken 96 times.
✓ Branch 1 taken 124 times.
✓ Branch 2 taken 88 times.
✓ Branch 3 taken 8 times.
✓ Branch 4 taken 72 times.
✓ Branch 5 taken 16 times.
✗ Branch 6 not taken.
✓ Branch 7 taken 72 times.
✗ Branch 8 not taken.
✓ Branch 9 taken 220 times.
✗ Branch 10 not taken.
✗ Branch 11 not taken.
|
220 |
if (!is_alnum(c) && c!='_' && c!=','&& c!='.') asar_throw_error(0, error_type_block, error_id_broken_macro_declaration); |
| 46 |
4/8
✓ Branch 0 taken 16 times.
✓ Branch 1 taken 204 times.
✗ Branch 2 not taken.
✓ Branch 3 taken 16 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 220 times.
✗ Branch 6 not taken.
✗ Branch 7 not taken.
|
220 |
if (c==',' && is_digit(startpar[i+1])) asar_throw_error(0, error_type_block, error_id_broken_macro_declaration); |
| 47 |
|
|
} |
| 48 |
5/12
✓ Branch 0 taken 52 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 52 times.
✗ Branch 3 not taken.
✓ Branch 4 taken 52 times.
✗ Branch 5 not taken.
✗ Branch 6 not taken.
✓ Branch 7 taken 52 times.
✗ Branch 8 not taken.
✓ Branch 9 taken 52 times.
✗ Branch 10 not taken.
✗ Branch 11 not taken.
|
52 |
if (*startpar==',' || is_digit(*startpar) || strstr(startpar, ",,") || endpar[-1]==',') asar_throw_error(0, error_type_block, error_id_broken_macro_declaration); |
| 49 |
2/6
✓ Branch 0 taken 52 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 52 times.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
|
52 |
if (macros.exists(thisname)) asar_throw_error(0, error_type_block, error_id_macro_redefined, thisname.data()); |
| 50 |
|
52 |
thisone=(macrodata*)malloc(sizeof(macrodata)); |
| 51 |
2/6
✓ Branch 0 taken 52 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 52 times.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
|
52 |
new(thisone) macrodata; |
| 52 |
2/2
✓ Branch 0 taken 32 times.
✓ Branch 1 taken 20 times.
|
52 |
if (*startpar) |
| 53 |
|
|
{ |
| 54 |
1/2
✓ Branch 0 taken 32 times.
✗ Branch 1 not taken.
|
32 |
thisone->arguments=(const char* const*)qpsplit(duplicate_string(startpar), ",", &thisone->numargs); |
| 55 |
|
|
} |
| 56 |
|
|
else |
| 57 |
|
|
{ |
| 58 |
|
20 |
const char ** noargs=(const char**)malloc(sizeof(const char**)); |
| 59 |
|
20 |
*noargs=nullptr; |
| 60 |
|
20 |
thisone->arguments=noargs; |
| 61 |
|
20 |
thisone->numargs=0; |
| 62 |
|
|
} |
| 63 |
|
52 |
thisone->variadic = false; |
| 64 |
|
52 |
thisone->fname= duplicate_string(thisfilename); |
| 65 |
|
52 |
thisone->startline=thisline; |
| 66 |
2/2
✓ Branch 0 taken 46 times.
✓ Branch 1 taken 50 times.
|
96 |
for (int i=0;thisone->arguments[i];i++) |
| 67 |
|
|
{ |
| 68 |
4/4
✓ Branch 0 taken 24 times.
✓ Branch 1 taken 22 times.
✓ Branch 2 taken 22 times.
✓ Branch 3 taken 2 times.
|
46 |
if(!strcmp(thisone->arguments[i], "...") && !thisone->arguments[i+1]) thisone->variadic = true; |
| 69 |
3/4
✓ Branch 0 taken 2 times.
✓ Branch 1 taken 22 times.
✗ Branch 2 not taken.
✓ Branch 3 taken 2 times.
|
24 |
else if(!strcmp(thisone->arguments[i], "...")) asar_throw_error(0, error_type_block, error_id_vararg_must_be_last); |
| 70 |
1/4
✗ Branch 0 not taken.
✓ Branch 1 taken 22 times.
✗ Branch 2 not taken.
✗ Branch 3 not taken.
|
22 |
else if(strchr(thisone->arguments[i], '.')) asar_throw_error(0, error_type_block, error_id_invalid_macro_param_name); |
| 71 |
2/6
✓ Branch 0 taken 22 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 22 times.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
|
22 |
else if (!confirmname(thisone->arguments[i])) asar_throw_error(0, error_type_block, error_id_invalid_macro_param_name); |
| 72 |
2/2
✓ Branch 0 taken 14 times.
✓ Branch 1 taken 44 times.
|
58 |
for (int j=i+1;thisone->arguments[j];j++) |
| 73 |
|
|
{ |
| 74 |
1/4
✗ Branch 0 not taken.
✓ Branch 1 taken 14 times.
✗ Branch 2 not taken.
✗ Branch 3 not taken.
|
14 |
if (!strcmp(thisone->arguments[i], thisone->arguments[j])) asar_throw_error(0, error_type_block, error_id_macro_param_redefined, thisone->arguments[i]); |
| 75 |
|
|
} |
| 76 |
|
|
} |
| 77 |
|
50 |
numlines=0; |
| 78 |
|
77 |
} |
| 79 |
|
|
|
| 80 |
|
128 |
void tomacro(const char * line) |
| 81 |
|
|
{ |
| 82 |
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 128 times.
|
128 |
if (!thisone) return; |
| 83 |
|
128 |
thisone->lines[numlines++]=line; |
| 84 |
|
|
} |
| 85 |
|
|
|
| 86 |
|
52 |
void endmacro(bool insert) |
| 87 |
|
|
{ |
| 88 |
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 52 times.
|
52 |
if (!thisone) return; |
| 89 |
|
52 |
thisone->numlines=numlines; |
| 90 |
1/2
✓ Branch 0 taken 52 times.
✗ Branch 1 not taken.
|
52 |
if (insert) macros.create(thisname) = thisone; |
| 91 |
|
✗ |
else delete thisone; |
| 92 |
|
|
} |
| 93 |
|
|
|
| 94 |
|
|
|
| 95 |
|
216 |
void callmacro(const char * data) |
| 96 |
|
|
{ |
| 97 |
|
216 |
int prev_numvarargs = numvarargs; |
| 98 |
|
|
macrodata * thismacro; |
| 99 |
2/6
✓ Branch 0 taken 216 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 216 times.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
|
216 |
if (!confirmqpar(data)) asar_throw_error(0, error_type_block, error_id_broken_macro_usage); |
| 100 |
1/2
✓ Branch 0 taken 216 times.
✗ Branch 1 not taken.
|
216 |
string line=data; |
| 101 |
5/10
✓ Branch 0 taken 216 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 216 times.
✗ Branch 3 not taken.
✓ Branch 4 taken 216 times.
✗ Branch 5 not taken.
✓ Branch 6 taken 216 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 216 times.
✗ Branch 9 not taken.
|
216 |
clean_and_trim(line); |
| 102 |
|
216 |
char * startpar=strqchr(line.data(), '('); |
| 103 |
1/4
✗ Branch 0 not taken.
✓ Branch 1 taken 216 times.
✗ Branch 2 not taken.
✗ Branch 3 not taken.
|
216 |
if (!startpar) asar_throw_error(0, error_type_block, error_id_broken_macro_usage); |
| 104 |
|
216 |
*startpar=0; |
| 105 |
|
216 |
startpar++; |
| 106 |
2/6
✓ Branch 0 taken 216 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 216 times.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
|
216 |
if (!confirmname(line)) asar_throw_error(0, error_type_block, error_id_broken_macro_usage); |
| 107 |
2/6
✓ Branch 0 taken 216 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 216 times.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
|
216 |
if (!macros.exists(line)) asar_throw_error(0, error_type_block, error_id_macro_not_found, line.data()); |
| 108 |
1/2
✓ Branch 0 taken 216 times.
✗ Branch 1 not taken.
|
216 |
thismacro = macros.find(line); |
| 109 |
|
216 |
char * endpar=strqrchr(startpar, ')'); |
| 110 |
1/4
✗ Branch 0 not taken.
✓ Branch 1 taken 216 times.
✗ Branch 2 not taken.
✗ Branch 3 not taken.
|
216 |
if (endpar[1]) asar_throw_error(0, error_type_block, error_id_broken_macro_usage); |
| 111 |
|
216 |
*endpar=0; |
| 112 |
|
216 |
autoptr<const char * const*> args; |
| 113 |
|
216 |
int numargs=0; |
| 114 |
3/4
✓ Branch 0 taken 138 times.
✓ Branch 1 taken 78 times.
✓ Branch 2 taken 138 times.
✗ Branch 3 not taken.
|
216 |
if (*startpar) args=(const char* const*)qpsplit(startpar, ",", &numargs); |
| 115 |
3/6
✓ Branch 0 taken 60 times.
✓ Branch 1 taken 156 times.
✗ Branch 2 not taken.
✓ Branch 3 taken 60 times.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
|
216 |
if (numargs != thismacro->numargs && !thismacro->variadic) asar_throw_error(1, error_type_block, error_id_macro_wrong_num_params); |
| 116 |
|
|
// RPG Hacker: -1, because the ... is also counted as an argument, yet we want it to be entirely optional. |
| 117 |
4/6
✓ Branch 0 taken 12 times.
✓ Branch 1 taken 204 times.
✓ Branch 2 taken 12 times.
✗ Branch 3 not taken.
✗ Branch 4 not taken.
✓ Branch 5 taken 12 times.
|
216 |
if (numargs < thismacro->numargs - 1 && thismacro->variadic) asar_throw_error(1, error_type_block, error_id_macro_wrong_min_params); |
| 118 |
|
|
|
| 119 |
|
204 |
macrorecursion++; |
| 120 |
|
204 |
inmacro=true; |
| 121 |
|
204 |
int old_calledmacros = calledmacros; |
| 122 |
|
204 |
calledmacros = reallycalledmacros++; |
| 123 |
|
204 |
int startif=numif; |
| 124 |
|
|
|
| 125 |
|
|
// RPG Hacker: -1 to take the ... into account, which is also being counted. |
| 126 |
2/2
✓ Branch 0 taken 78 times.
✓ Branch 1 taken 126 times.
|
204 |
if(thismacro->variadic) numvarargs = numargs-(thismacro->numargs-1); |
| 127 |
|
126 |
else numvarargs = -1; |
| 128 |
|
|
|
| 129 |
|
204 |
autoarray<int>* oldmacroposlabels = macroposlabels; |
| 130 |
|
204 |
autoarray<int>* oldmacroneglabels = macroneglabels; |
| 131 |
|
204 |
autoarray<string>* oldmacrosublabels = macrosublabels; |
| 132 |
|
|
|
| 133 |
|
204 |
autoarray<int> newmacroposlabels; |
| 134 |
|
204 |
autoarray<int> newmacroneglabels; |
| 135 |
|
204 |
autoarray<string> newmacrosublabels; |
| 136 |
|
|
|
| 137 |
|
204 |
macroposlabels = &newmacroposlabels; |
| 138 |
|
204 |
macroneglabels = &newmacroneglabels; |
| 139 |
|
204 |
macrosublabels = &newmacrosublabels; |
| 140 |
|
|
|
| 141 |
|
204 |
macrodata* old_macro = current_macro; |
| 142 |
|
204 |
const char* const* old_macro_args = current_macro_args; |
| 143 |
|
204 |
int old_numargs = current_macro_numargs; |
| 144 |
|
204 |
current_macro = thismacro; |
| 145 |
|
204 |
current_macro_args = args; |
| 146 |
|
204 |
current_macro_numargs = numargs; |
| 147 |
|
|
|
| 148 |
2/2
✓ Branch 0 taken 1032 times.
✓ Branch 1 taken 204 times.
|
1236 |
for (int i=0;i<thismacro->numlines;i++) |
| 149 |
|
|
{ |
| 150 |
|
|
try |
| 151 |
|
|
{ |
| 152 |
1/2
✓ Branch 0 taken 1032 times.
✗ Branch 1 not taken.
|
1032 |
thisfilename= thismacro->fname; |
| 153 |
|
1032 |
thisline= thismacro->startline+i+1; |
| 154 |
|
1032 |
thisblock= nullptr; |
| 155 |
|
1032 |
string connectedline; |
| 156 |
1/2
✓ Branch 0 taken 1032 times.
✗ Branch 1 not taken.
|
1032 |
int skiplines = getconnectedlines<autoarray<string> >(thismacro->lines, i, connectedline); |
| 157 |
|
|
//string out = replace_macro_args(connectedline); // done in assembleline |
| 158 |
|
1032 |
int prevnumif = numif; |
| 159 |
1/2
✓ Branch 0 taken 1032 times.
✗ Branch 1 not taken.
|
1032 |
assembleline(thismacro->fname, thismacro->startline+i, connectedline); |
| 160 |
|
1032 |
i += skiplines; |
| 161 |
13/18
✓ Branch 0 taken 696 times.
✓ Branch 1 taken 336 times.
✗ Branch 2 not taken.
✓ Branch 3 taken 696 times.
✓ Branch 4 taken 336 times.
✗ Branch 5 not taken.
✓ Branch 6 taken 108 times.
✓ Branch 7 taken 228 times.
✓ Branch 8 taken 108 times.
✗ Branch 9 not taken.
✗ Branch 10 not taken.
✓ Branch 11 taken 108 times.
✓ Branch 12 taken 228 times.
✗ Branch 13 not taken.
✓ Branch 14 taken 132 times.
✓ Branch 15 taken 96 times.
✓ Branch 16 taken 132 times.
✓ Branch 17 taken 900 times.
|
1032 |
if ((numif != prevnumif || single_line_for_tracker == 3) && (whilestatus[numif].iswhile || whilestatus[numif].is_for) && whilestatus[numif].cond) |
| 162 |
1/2
✓ Branch 0 taken 132 times.
✗ Branch 1 not taken.
|
132 |
i = whilestatus[numif].startline - thismacro->startline - 1; |
| 163 |
|
1032 |
} |
| 164 |
|
✗ |
catch(errline&){} |
| 165 |
|
|
} |
| 166 |
|
|
|
| 167 |
|
204 |
current_macro = old_macro; |
| 168 |
|
204 |
current_macro_args = old_macro_args; |
| 169 |
|
204 |
current_macro_numargs = old_numargs; |
| 170 |
|
|
|
| 171 |
|
204 |
macroposlabels = oldmacroposlabels; |
| 172 |
|
204 |
macroneglabels = oldmacroneglabels; |
| 173 |
|
204 |
macrosublabels = oldmacrosublabels; |
| 174 |
|
|
|
| 175 |
|
204 |
macrorecursion--; |
| 176 |
|
204 |
inmacro = macrorecursion; |
| 177 |
|
204 |
numvarargs = prev_numvarargs; |
| 178 |
|
204 |
calledmacros = old_calledmacros; |
| 179 |
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 204 times.
|
204 |
if (repeatnext!=1) |
| 180 |
|
|
{ |
| 181 |
|
✗ |
thisblock= nullptr; |
| 182 |
|
✗ |
repeatnext=1; |
| 183 |
|
✗ |
asar_throw_error(0, error_type_block, error_id_rep_at_macro_end); |
| 184 |
|
|
} |
| 185 |
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 204 times.
|
204 |
if (numif!=startif) |
| 186 |
|
|
{ |
| 187 |
|
✗ |
thisblock= nullptr; |
| 188 |
|
✗ |
numif=startif; |
| 189 |
|
✗ |
numtrue=startif; |
| 190 |
|
✗ |
asar_throw_error(0, error_type_block, error_id_unclosed_if); |
| 191 |
|
|
} |
| 192 |
|
330 |
} |
| 193 |
|
|
|
| 194 |
|
948 |
string replace_macro_args(const char* line) { |
| 195 |
|
948 |
string out; |
| 196 |
2/2
✓ Branch 0 taken 11508 times.
✓ Branch 1 taken 906 times.
|
12414 |
for (const char * in=line;*in;) |
| 197 |
|
|
{ |
| 198 |
3/6
✓ Branch 0 taken 348 times.
✓ Branch 1 taken 11160 times.
✗ Branch 2 not taken.
✓ Branch 3 taken 348 times.
✗ Branch 4 not taken.
✗ Branch 5 not taken.
|
11508 |
if (*in=='<' && in[1]=='<' && in[2] != ':') |
| 199 |
|
|
{ |
| 200 |
|
✗ |
out+="<<"; |
| 201 |
|
✗ |
in+=2; |
| 202 |
|
|
} |
| 203 |
2/2
✓ Branch 0 taken 348 times.
✓ Branch 1 taken 11160 times.
|
11508 |
else if (*in=='<') |
| 204 |
|
|
{ |
| 205 |
|
348 |
const char * end=in+1; |
| 206 |
|
|
// RPG Hacker: Added checking for space here, because this code would consider |
| 207 |
|
|
// if a < b && a > c |
| 208 |
|
|
// a macro arg expansion. In practice, this is still a sloppy solution and is |
| 209 |
|
|
// likely to fail in some edge case I can't think of right now. Should parse |
| 210 |
|
|
// this in a much more robust way at some point... |
| 211 |
2/2
✓ Branch 0 taken 84 times.
✓ Branch 1 taken 264 times.
|
348 |
if (*end==' ') |
| 212 |
|
|
{ |
| 213 |
1/2
✓ Branch 0 taken 84 times.
✗ Branch 1 not taken.
|
84 |
out += *(in++); |
| 214 |
|
84 |
continue; |
| 215 |
|
|
} |
| 216 |
|
|
|
| 217 |
5/8
✓ Branch 0 taken 2058 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 1794 times.
✓ Branch 3 taken 264 times.
✓ Branch 4 taken 1794 times.
✗ Branch 5 not taken.
✓ Branch 6 taken 1794 times.
✗ Branch 7 not taken.
|
2058 |
while (*end && *end!='>'&& *end!='<' && *(end+1)!=':') end++; //allow for conditionals and <: |
| 218 |
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 264 times.
|
264 |
if (*end!='>') |
| 219 |
|
|
{ |
| 220 |
|
✗ |
out+=*(in++); |
| 221 |
|
✗ |
continue; |
| 222 |
|
|
} |
| 223 |
|
|
|
| 224 |
|
264 |
bool proper_variadic = false; |
| 225 |
5/8
✓ Branch 0 taken 138 times.
✓ Branch 1 taken 126 times.
✓ Branch 2 taken 138 times.
✗ Branch 3 not taken.
✓ Branch 4 taken 138 times.
✗ Branch 5 not taken.
✓ Branch 6 taken 138 times.
✗ Branch 7 not taken.
|
264 |
if (in[1] == '.' && in[2] == '.' && in[3] == '.' && in[4] == '[') |
| 226 |
|
|
{ |
| 227 |
2/2
✓ Branch 0 taken 6 times.
✓ Branch 1 taken 132 times.
|
138 |
if (end[-1] != ']') |
| 228 |
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 6 times.
|
6 |
asar_throw_error(0, error_type_block, error_id_unclosed_vararg); |
| 229 |
|
|
|
| 230 |
|
132 |
proper_variadic = true; |
| 231 |
|
132 |
in += 4; |
| 232 |
|
132 |
end--; |
| 233 |
|
|
} |
| 234 |
|
|
|
| 235 |
1/4
✗ Branch 0 not taken.
✓ Branch 1 taken 258 times.
✗ Branch 2 not taken.
✗ Branch 3 not taken.
|
258 |
if(!inmacro) asar_throw_error(0, error_type_block, error_id_macro_param_outside_macro); |
| 236 |
|
|
//*end=0; |
| 237 |
|
258 |
in++; |
| 238 |
|
258 |
string param; |
| 239 |
1/2
✓ Branch 0 taken 258 times.
✗ Branch 1 not taken.
|
258 |
string temp(in, end-in); |
| 240 |
1/2
✓ Branch 0 taken 258 times.
✗ Branch 1 not taken.
|
258 |
resolvedefines(param, temp); |
| 241 |
|
258 |
in = param.data(); |
| 242 |
1/2
✓ Branch 0 taken 258 times.
✗ Branch 1 not taken.
|
258 |
bool valid_named_param = confirmname(in); |
| 243 |
5/6
✓ Branch 0 taken 138 times.
✓ Branch 1 taken 120 times.
✓ Branch 2 taken 6 times.
✓ Branch 3 taken 132 times.
✗ Branch 4 not taken.
✓ Branch 5 taken 6 times.
|
258 |
if (!valid_named_param && !current_macro->variadic) asar_throw_error(0, error_type_block, error_id_invalid_macro_param_name); |
| 244 |
|
252 |
bool found=false; |
| 245 |
4/4
✓ Branch 0 taken 288 times.
✓ Branch 1 taken 18 times.
✓ Branch 2 taken 156 times.
✓ Branch 3 taken 132 times.
|
306 |
for (int j=0;current_macro->arguments[j]&&!proper_variadic;j++) |
| 246 |
|
|
{ |
| 247 |
2/2
✓ Branch 0 taken 102 times.
✓ Branch 1 taken 54 times.
|
156 |
if (!strcmp(in, current_macro->arguments[j])) |
| 248 |
|
|
{ |
| 249 |
|
102 |
found=true; |
| 250 |
2/2
✓ Branch 0 taken 72 times.
✓ Branch 1 taken 30 times.
|
102 |
if (current_macro_args[j][0]=='"') |
| 251 |
|
|
{ |
| 252 |
1/2
✓ Branch 0 taken 72 times.
✗ Branch 1 not taken.
|
72 |
string s=current_macro_args[j]; |
| 253 |
2/4
✓ Branch 0 taken 72 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 72 times.
✗ Branch 3 not taken.
|
72 |
out+=safedequote(s.temp_raw()); |
| 254 |
|
72 |
} |
| 255 |
1/2
✓ Branch 0 taken 30 times.
✗ Branch 1 not taken.
|
30 |
else out+=current_macro_args[j]; |
| 256 |
|
102 |
break; |
| 257 |
|
|
} |
| 258 |
|
|
} |
| 259 |
2/2
✓ Branch 0 taken 150 times.
✓ Branch 1 taken 102 times.
|
252 |
if (!found) |
| 260 |
|
|
{ |
| 261 |
|
150 |
snes_label ret; |
| 262 |
4/4
✓ Branch 0 taken 18 times.
✓ Branch 1 taken 132 times.
✓ Branch 2 taken 6 times.
✓ Branch 3 taken 12 times.
|
150 |
if(valid_named_param && !current_macro->variadic) |
| 263 |
|
|
{ |
| 264 |
2/4
✓ Branch 0 taken 6 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 6 times.
|
6 |
if (proper_variadic) asar_throw_error(0, error_type_block, error_id_invalid_vararg, in); |
| 265 |
|
✗ |
else asar_throw_error(0, error_type_block, error_id_macro_param_not_found, in); |
| 266 |
|
|
} |
| 267 |
13/20
✓ Branch 0 taken 144 times.
✗ Branch 1 not taken.
✓ Branch 2 taken 12 times.
✓ Branch 3 taken 132 times.
✓ Branch 4 taken 12 times.
✗ Branch 5 not taken.
✓ Branch 6 taken 12 times.
✗ Branch 7 not taken.
✓ Branch 8 taken 6 times.
✓ Branch 9 taken 6 times.
✓ Branch 10 taken 12 times.
✓ Branch 11 taken 132 times.
✓ Branch 12 taken 9 times.
✓ Branch 13 taken 135 times.
✓ Branch 14 taken 3 times.
✓ Branch 15 taken 69 times.
✗ Branch 16 not taken.
✗ Branch 17 not taken.
✗ Branch 18 not taken.
✗ Branch 19 not taken.
|
144 |
if(current_macro->variadic && valid_named_param && !labelval(in, &ret, false)) |
| 268 |
|
|
{ |
| 269 |
2/4
✓ Branch 0 taken 6 times.
✗ Branch 1 not taken.
✗ Branch 2 not taken.
✓ Branch 3 taken 6 times.
|
6 |
if (proper_variadic) asar_throw_error(0, error_type_block, error_id_invalid_vararg, in); |
| 270 |
|
✗ |
else asar_throw_error(0, error_type_block, error_id_macro_param_not_found, in); |
| 271 |
|
|
} |
| 272 |
3/4
✓ Branch 0 taken 18 times.
✓ Branch 1 taken 120 times.
✓ Branch 2 taken 18 times.
✗ Branch 3 not taken.
|
138 |
if(!proper_variadic) asar_throw_warning(0, warning_id_feature_deprecated, "'<math>' syntax for variadic macro parameters", "Use '<...[math]>' instead."); |
| 273 |
1/2
✓ Branch 0 taken 138 times.
✗ Branch 1 not taken.
|
138 |
int arg_num = getnum(in); |
| 274 |
|
|
|
| 275 |
1/4
✗ Branch 0 not taken.
✓ Branch 1 taken 138 times.
✗ Branch 2 not taken.
✗ Branch 3 not taken.
|
138 |
if(forwardlabel) asar_throw_error(0, error_type_block, error_id_label_forward); |
| 276 |
|
|
|
| 277 |
1/2
✓ Branch 0 taken 138 times.
✗ Branch 1 not taken.
|
138 |
if(numif<=numtrue){ |
| 278 |
3/4
✓ Branch 0 taken 6 times.
✓ Branch 1 taken 132 times.
✗ Branch 2 not taken.
✓ Branch 3 taken 6 times.
|
138 |
if (arg_num < 0) asar_throw_error(1, error_type_block, error_id_vararg_out_of_bounds); |
| 279 |
3/4
✓ Branch 0 taken 12 times.
✓ Branch 1 taken 120 times.
✗ Branch 2 not taken.
✓ Branch 3 taken 12 times.
|
132 |
if (arg_num > current_macro_numargs-current_macro->numargs) asar_throw_error(1, error_type_block, error_id_vararg_out_of_bounds); |
| 280 |
1/2
✗ Branch 0 not taken.
✓ Branch 1 taken 120 times.
|
120 |
if (current_macro_args[arg_num+current_macro->numargs-1][0]=='"') |
| 281 |
|
|
{ |
| 282 |
|
✗ |
string s=current_macro_args[arg_num+current_macro->numargs-1]; |
| 283 |
|
✗ |
out+=safedequote(s.temp_raw()); |
| 284 |
|
✗ |
} |
| 285 |
1/2
✓ Branch 0 taken 120 times.
✗ Branch 1 not taken.
|
120 |
else out+=current_macro_args[arg_num+current_macro->numargs-1]; |
| 286 |
|
|
} |
| 287 |
|
|
} |
| 288 |
|
222 |
in=end+1; |
| 289 |
2/2
✓ Branch 0 taken 102 times.
✓ Branch 1 taken 120 times.
|
222 |
if (proper_variadic) in++; |
| 290 |
|
294 |
} |
| 291 |
1/2
✓ Branch 0 taken 11160 times.
✗ Branch 1 not taken.
|
11160 |
else out+=*(in++); |
| 292 |
|
|
} |
| 293 |
|
906 |
return out; |
| 294 |
|
42 |
} |
| 295 |
|
|
|