/[suikacvs]/www/test/support/result0.js
Suika

Contents of /www/test/support/result0.js

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.4 - (hide annotations) (download) (as text)
Sun Jan 13 03:22:24 2008 UTC (18 years, 6 months ago) by wakaba
Branch: MAIN
CVS Tags: HEAD
Changes since 1.3: +1 -1 lines
File MIME type: application/javascript
*** empty log message ***

1 wakaba 1.1 function htescape (s) {
2 wakaba 1.4 return s.replace (/&/g, '&amp;').replace (/</g, '&lt;');
3 wakaba 1.1 } // htescape
4    
5     function writeResult (value) {
6     if (typeof (value) == 'undefined') {
7     document.write ('<code>undefined</code>');
8     } else if (value == null) {
9     document.write ('<code>null</code>');
10 wakaba 1.2 } else if (value.toString) {
11     var vString = value.toString ();
12     if (vString == '') {
13     document.write ('An empty string');
14     } else {
15     document.write ('<code>' + htescape (vString) + '</code>');
16     }
17     document.write (', type <code>' + htescape (typeof (value)) + '</code>');
18 wakaba 1.1 } else {
19 wakaba 1.2 var vString = '' + value;
20 wakaba 1.1 if (vString == '') {
21     document.write ('An empty string');
22     } else {
23     document.write ('<code>' + htescape (vString) + '</code>');
24     }
25     document.write (', type <code>' + htescape (typeof (value)) + '</code>');
26     }
27     } // writeResult
28 wakaba 1.3
29     function setValueResult (obj, value) {
30     var rvalue = '';
31     if (typeof (value) == 'undefined') {
32     rvalue = 'undefined';
33     } else if (value == null) {
34     rvalue = 'null';
35     } else if (value.toString) {
36     var vString = value.toString ();
37     if (vString == '') {
38     rvalue = 'An empty string';
39     } else {
40     rvalue = vString.replace (/%/, '%25').replace (/\u000D/, '%0D')
41     .replace (/\u000A/, '%0A').replace (/\u000C/, '%0C');
42     }
43     rvalue += ', type ' + typeof (value);
44     } else {
45     var vString = '' + value;
46     if (vString == '') {
47     rvalue = 'An empty string';
48     } else {
49     rvalue = vString.replace (/%/, '%25').replace (/\u000D/, '%0D')
50     .replace (/\u000A/, '%0A').replace (/\u000C/, '%0C');
51     }
52     rvalue += ', type ' + typeof (value);
53     }
54     obj.value = rvalue;
55     } // setValueResult

[email protected]
ViewVC Help
Powered by ViewVC 1.1.24