head	1.2;
access;
symbols
	perseant-exfatfs-base-20250801:1.2
	perseant-exfatfs-base-20240630:1.2
	cjep_sun2x:1.2.0.44
	cjep_sun2x-base:1.2
	cjep_staticlib_x-base1:1.2
	cjep_staticlib_x:1.2.0.42
	cjep_staticlib_x-base:1.2
	phil-wifi-20200421:1.2
	phil-wifi-20200411:1.2
	phil-wifi-20200406:1.2
	pgoyette-compat-merge-20190127:1.2
	pgoyette-compat-20190127:1.2
	pgoyette-compat-20190118:1.2
	pgoyette-compat-1226:1.2
	pgoyette-compat-1126:1.2
	pgoyette-compat-1020:1.2
	pgoyette-compat-0930:1.2
	pgoyette-compat-0906:1.2
	pgoyette-compat-0728:1.2
	pgoyette-compat-0625:1.2
	pgoyette-compat-0521:1.2
	pgoyette-compat-0502:1.2
	pgoyette-compat-0422:1.2
	pgoyette-compat-0415:1.2
	pgoyette-compat-0407:1.2
	pgoyette-compat-0330:1.2
	pgoyette-compat-0322:1.2
	pgoyette-compat-0315:1.2
	pgoyette-compat:1.2.0.40
	pgoyette-compat-base:1.2
	perseant-stdc-iso10646:1.2.0.38
	perseant-stdc-iso10646-base:1.2
	prg-localcount2-base3:1.2
	prg-localcount2-base2:1.2
	prg-localcount2-base1:1.2
	prg-localcount2:1.2.0.36
	prg-localcount2-base:1.2
	pgoyette-localcount-20170426:1.2
	bouyer-socketcan-base1:1.2
	pgoyette-localcount-20170320:1.2
	bouyer-socketcan:1.2.0.34
	bouyer-socketcan-base:1.2
	pgoyette-localcount-20170107:1.2
	pgoyette-localcount-20161104:1.2
	localcount-20160914:1.2
	pgoyette-localcount-20160806:1.2
	pgoyette-localcount-20160726:1.2
	pgoyette-localcount:1.2.0.32
	pgoyette-localcount-base:1.2
	netbsd-5-2-3-RELEASE:1.2
	netbsd-5-1-5-RELEASE:1.2
	yamt-pagecache-base9:1.2
	yamt-pagecache-tag8:1.2
	tls-earlyentropy:1.2.0.28
	tls-earlyentropy-base:1.2
	riastradh-xf86-video-intel-2-7-1-pre-2-21-15:1.2
	riastradh-drm2-base3:1.2
	netbsd-5-2-2-RELEASE:1.2
	netbsd-5-1-4-RELEASE:1.2
	netbsd-5-2-1-RELEASE:1.2
	netbsd-5-1-3-RELEASE:1.2
	agc-symver:1.2.0.30
	agc-symver-base:1.2
	tls-maxphys-base:1.2
	yamt-pagecache-base8:1.2
	netbsd-5-2:1.2.0.26
	yamt-pagecache-base7:1.2
	netbsd-5-2-RELEASE:1.2
	netbsd-5-2-RC1:1.2
	yamt-pagecache-base6:1.2
	yamt-pagecache-base5:1.2
	yamt-pagecache-base4:1.2
	netbsd-5-1-2-RELEASE:1.2
	netbsd-5-1-1-RELEASE:1.2
	yamt-pagecache-base3:1.2
	yamt-pagecache-base2:1.2
	yamt-pagecache:1.2.0.24
	yamt-pagecache-base:1.2
	bouyer-quota2-nbase:1.2
	bouyer-quota2:1.2.0.22
	bouyer-quota2-base:1.2
	matt-nb5-pq3:1.2.0.20
	matt-nb5-pq3-base:1.2
	netbsd-5-1:1.2.0.18
	netbsd-5-1-RELEASE:1.2
	netbsd-5-1-RC4:1.2
	netbsd-5-1-RC3:1.2
	netbsd-5-1-RC2:1.2
	netbsd-5-1-RC1:1.2
	netbsd-5-0-2-RELEASE:1.2
	netbsd-5-0-1-RELEASE:1.2
	jym-xensuspend-nbase:1.2
	netbsd-5-0:1.2.0.16
	netbsd-5-0-RELEASE:1.2
	netbsd-5-0-RC4:1.2
	netbsd-5-0-RC3:1.2
	netbsd-5-0-RC2:1.2
	jym-xensuspend:1.2.0.14
	jym-xensuspend-base:1.2
	netbsd-5-0-RC1:1.2
	netbsd-5:1.2.0.12
	netbsd-5-base:1.2
	mjf-devfs2:1.2.0.10
	mjf-devfs2-base:1.2
	yamt-pf42-base4:1.2
	yamt-pf42-base3:1.2
	hpcarm-cleanup-nbase:1.2
	yamt-pf42-base2:1.2
	yamt-pf42:1.2.0.8
	yamt-pf42-base:1.2
	keiichi-mipv6:1.2.0.6
	keiichi-mipv6-base:1.2
	cube-autoconf:1.2.0.4
	cube-autoconf-base:1.2
	hpcarm-cleanup:1.2.0.2
	hpcarm-cleanup-base:1.2
	gawk-3-1-3-before-remove:1.1.1.1
	gawk-3-1-3:1.1.1.1
	FSF:1.1.1;
locks; strict;
comment	@# @;


1.2
date	2004.03.26.17.16.32;	author jdolecek;	state dead;
branches;
next	1.1;

1.1
date	2003.10.06.16.02.03;	author wiz;	state Exp;
branches
	1.1.1.1;
next	;

1.1.1.1
date	2003.10.06.16.02.03;	author wiz;	state Exp;
branches;
next	;


desc
@@


1.2
log
@delete GNU gawk 3.1.3 sources.  they are available in cvs with
"cvs co -r gawk-3-1-3-before-remove src/gnu/dist/gawk".
@
text
@# Test program for checking sprintf operation with various floating
# point formats
#
# Watch out - full output of this program will have 3000 * tot lines,
# which will take a chunk of space if you will write it to your disk.
# --mj

BEGIN {
    just = "-"
    plus = "+ "
    alt  = "#"
    zero = "0"
    spec = "feEgG"
    fw[1] = ""
    fw[2] = "1"
    fw[3] = "5"
    fw[4] = "10"
    fw[5] = "15"
    prec[1] = ".-1"
    prec[2] = ""
    prec[3] = ".2"
    prec[4] = ".5"
    prec[5] = ".10"

    num = 123.6
    factor = 1.0e-12
    tot = 8
    data[1] = 0
    data[2] = 1
    for (i = 3; i <= tot; i++) {
	data[i] = num * factor
	factor *= 1000
    }

    for (j = 1; j <= 2; j++) {
	for (p = 1; p <= 3; p++) {
	    for (a = 1; a <= 2; a++) {
		for (z = 1; z <= 2; z++) {
		    for (s = 1; s <= 5; s++) {
			for (w = 1; w <= 5; w++) {
			    for (r = 1; r <= 5; r++) {
				frmt = "|%" substr(just, j, 1)
				frmt = frmt substr(plus, p, 1)
				frmt = frmt substr(alt,  a, 1)
				frmt = frmt substr(zero, z, 1)
				frmt = frmt fw[w] prec[r]
				frmt = frmt substr(spec, s, 1) "|"
				for (i = 1; i <= tot; i++) {
				    result = sprintf(frmt, data[i])
#				    "normalize" if you must
#				    sub(/\|\./, "|0.", result)
				    printf("%-16s %-25s\t%g\n", frmt,
						 result,data[i])
				}
			    }
			}
		    }
		}
	    }
	}
    }
}
@


1.1
log
@Initial revision
@
text
@@


1.1.1.1
log
@Initial import of gawk-3.1.3.
Seven releases since the last import, so the ChangeLog is quite big;
please refer to the NEWS file included in the import for details.
Among others, this also addresses PR 23054.
@
text
@@