"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "test/profile5.ok" between
gawk-5.0.1.tar.xz and gawk-5.1.0.tar.xz

About: GNU awk - pattern scanning and processing language.

profile5.ok  (gawk-5.0.1.tar.xz):profile5.ok  (gawk-5.1.0.tar.xz)
skipping to change at line 1631 skipping to change at line 1631
d = RLENGTH d = RLENGTH
if ((c = split(r = t, A, /\x0D?\x0A/, B)) > 0) { if ((c = split(r = t, A, /\x0D?\x0A/, B)) > 0) {
a = BINMODE a = BINMODE
b = ORS b = ORS
BINMODE = "rw" BINMODE = "rw"
ORS = "" ORS = ""
if (c > 1) { if (c > 1) {
if ((i = length(t = _tabtospc(A[1], ts, _conlastrln))) < _constatstrln) { if ((i = length(t = _tabtospc(A[1], ts, _conlastrln))) < _constatstrln) {
t = t _getchrln(" ", _constatstrln - i) t = t _getchrln(" ", _constatstrln - i)
} }
print((t B[1])) > _SYS_STDCON print(t B[1]) > _SYS_STDCON
for (i = 2; i < c; i++) { for (i = 2; i < c; i++) {
print((_tabtospc(A[i], ts) B[i])) > _SYS_STDCON print(_tabtospc(A[i], ts) B[i]) > _SYS_STDCON
} }
print((_conlastr = _tabtospc(A[c], ts))) > _SYS_STDCON print(_conlastr = _tabtospc(A[c], ts)) > _SYS_STDCON
fflush(_SYS_STDCON) fflush(_SYS_STDCON)
} else { } else {
print((t = _tabtospc(t, ts, _conlastrln))) > _SYS_STDCON print(t = _tabtospc(t, ts, _conlastrln)) > _SYS_STDCON
fflush(_SYS_STDCON) fflush(_SYS_STDCON)
_conlastr = _conlastr t _conlastr = _conlastr t
} }
if ((i = length(_conlastr)) >= _CON_WIDTH) { if ((i = length(_conlastr)) >= _CON_WIDTH) {
_conlastr = substr(_conlastr, 1 + (int(i / _CON_WIDTH) * _CON_WIDTH)) _conlastr = substr(_conlastr, 1 + (int(i / _CON_WIDTH) * _CON_WIDTH))
} }
_conlastrln = length(_conlastr) _conlastrln = length(_conlastr)
if (_constatstr) { if (_constatstr) {
print(((t = _constatgtstr(_constatstr, _CON_WIDTH - 1 - _ conlastrln)) _CHR["CR"] _conlastr)) > _SYS_STDCON print((t = _constatgtstr(_constatstr, _CON_WIDTH - 1 - _c onlastrln)) _CHR["CR"] _conlastr) > _SYS_STDCON
fflush(_SYS_STDCON) fflush(_SYS_STDCON)
_constatstrln = length(t) _constatstrln = length(t)
} }
BINMODE = a BINMODE = a
ORS = b ORS = b
RLENGTH = d RLENGTH = d
return r return r
} }
RLENGTH = d RLENGTH = d
} }
skipping to change at line 1714 skipping to change at line 1714
{ {
########################################### ###########################################
if (_constatstrln > (ln = length(t = _constatgtstr(_constatstr = _tabtosp c(t, ts), _CON_WIDTH - 1 - _conlastrln)))) { if (_constatstrln > (ln = length(t = _constatgtstr(_constatstr = _tabtosp c(t, ts), _CON_WIDTH - 1 - _conlastrln)))) {
t = t _getchrln(" ", _constatstrln - ln) t = t _getchrln(" ", _constatstrln - ln)
} }
_constatstrln = ln _constatstrln = ln
ln = ORS ln = ORS
a = BINMODE a = BINMODE
BINMODE = "rw" BINMODE = "rw"
ORS = "" ORS = ""
print((t _CHR["CR"] _conlastr)) > _SYS_STDCON print(t _CHR["CR"] _conlastr) > _SYS_STDCON
fflush(_SYS_STDCON) fflush(_SYS_STDCON)
ORS = ln ORS = ln
BINMODE = a BINMODE = a
return _constatstr return _constatstr
} }
#_________________________________________________________________ #_________________________________________________________________
function _constatgtstr(t, ln, a, b) function _constatgtstr(t, ln, a, b)
{ {
if (ln < 1) { if (ln < 1) {
skipping to change at line 8043 skipping to change at line 8043
return return
a = a + -a a = a + -a
_conl("``````````````" a "''''''''''''''''") _conl("``````````````" a "''''''''''''''''")
} }
#_____________________________________________________________________________ #_____________________________________________________________________________
function zzer() function zzer()
{ {
################################################################ ################################################################
} }
gawk: profile5.awk:3278: warning: regexp escape sequence `\~' is not a known reg
exp operator
gawk: profile5.awk:3601: warning: regexp escape sequence `\!' is not a known reg
exp operator
gawk: profile5.awk:3610: warning: regexp escape sequence `\:' is not a known reg
exp operator
gawk: profile5.awk:3742: warning: regexp escape sequence `\,' is not a known reg
exp operator
 End of changes. 7 change blocks. 
6 lines changed or deleted 6 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)