171 |
|
|
172 |
for (i = 1; i < argc; i++) |
for (i = 1; i < argc; i++) |
173 |
{ |
{ |
174 |
m4_set_syntax (*M4_SYMBOL_TEXT (argv[i]), |
m4_set_syntax (*M4_TOKEN_DATA_TEXT (argv[i]), |
175 |
m4_expand_ranges (M4_SYMBOL_TEXT (argv[i])+1, obs)); |
m4_expand_ranges (M4_TOKEN_DATA_TEXT (argv[i])+1, obs)); |
176 |
} |
} |
177 |
} |
} |
178 |
|
|
270 |
if (m4_bad_argc (argv[0], argc, 3, 4)) |
if (m4_bad_argc (argv[0], argc, 3, 4)) |
271 |
return; |
return; |
272 |
|
|
273 |
victim = M4_SYMBOL_TEXT (argv[1]); |
victim = M4_TOKEN_DATA_TEXT (argv[1]); |
274 |
regexp = M4_SYMBOL_TEXT (argv[2]); |
regexp = M4_TOKEN_DATA_TEXT (argv[2]); |
275 |
|
|
276 |
buf.buffer = NULL; |
buf.buffer = NULL; |
277 |
buf.allocated = 0; |
buf.allocated = 0; |
301 |
m4_shipout_int (obs, startpos); |
m4_shipout_int (obs, startpos); |
302 |
else if (startpos >= 0) |
else if (startpos >= 0) |
303 |
{ |
{ |
304 |
repl = M4_SYMBOL_TEXT (argv[3]); |
repl = M4_TOKEN_DATA_TEXT (argv[3]); |
305 |
substitute (obs, victim, repl, ®s); |
substitute (obs, victim, repl, ®s); |
306 |
} |
} |
307 |
|
|
331 |
if (m4_bad_argc (argv[0], argc, 3, 4)) |
if (m4_bad_argc (argv[0], argc, 3, 4)) |
332 |
return; |
return; |
333 |
|
|
334 |
regexp = M4_SYMBOL_TEXT (argv[2]); |
regexp = M4_TOKEN_DATA_TEXT (argv[2]); |
335 |
|
|
336 |
buf.buffer = NULL; |
buf.buffer = NULL; |
337 |
buf.allocated = 0; |
buf.allocated = 0; |
348 |
return; |
return; |
349 |
} |
} |
350 |
|
|
351 |
victim = M4_SYMBOL_TEXT (argv[1]); |
victim = M4_TOKEN_DATA_TEXT (argv[1]); |
352 |
length = strlen (victim); |
length = strlen (victim); |
353 |
|
|
354 |
offset = 0; |
offset = 0; |
433 |
if (m4_bad_argc (argv[0], argc, 2, 2)) |
if (m4_bad_argc (argv[0], argc, 2, 2)) |
434 |
return; |
return; |
435 |
|
|
436 |
if (M4_SYMBOL_TYPE (argv[1]) != M4_TOKEN_TEXT) |
if (M4_TOKEN_DATA_TYPE (argv[1]) != M4_TOKEN_TEXT) |
437 |
return; |
return; |
438 |
|
|
439 |
if (M4_SYMBOL_TEXT(argv[1])[0] == '0' |
if (M4_TOKEN_DATA_TEXT(argv[1])[0] == '0' |
440 |
|| M4_SYMBOL_TEXT(argv[1])[0] == 'n' |
|| M4_TOKEN_DATA_TEXT(argv[1])[0] == 'n' |
441 |
|| (M4_SYMBOL_TEXT(argv[1])[0] == 'o' |
|| (M4_TOKEN_DATA_TEXT(argv[1])[0] == 'o' |
442 |
&& M4_SYMBOL_TEXT(argv[1])[1] == 'f')) |
&& M4_TOKEN_DATA_TEXT(argv[1])[1] == 'f')) |
443 |
sync_output = 0; |
sync_output = 0; |
444 |
else if (M4_SYMBOL_TEXT(argv[1])[0] == '1' |
else if (M4_TOKEN_DATA_TEXT(argv[1])[0] == '1' |
445 |
|| M4_SYMBOL_TEXT(argv[1])[0] == 'y' |
|| M4_TOKEN_DATA_TEXT(argv[1])[0] == 'y' |
446 |
|| (M4_SYMBOL_TEXT(argv[1])[0] == 'o' |
|| (M4_TOKEN_DATA_TEXT(argv[1])[0] == 'o' |
447 |
&& M4_SYMBOL_TEXT(argv[1])[1] == 'n')) |
&& M4_TOKEN_DATA_TEXT(argv[1])[1] == 'n')) |
448 |
sync_output = 1; |
sync_output = 1; |
449 |
} |
} |
450 |
|
|