diff options
Diffstat (limited to 'cddl/contrib/opensolaris/cmd/dtrace/test/tst/common/funcs/tst.substr.d.out')
-rw-r--r-- | cddl/contrib/opensolaris/cmd/dtrace/test/tst/common/funcs/tst.substr.d.out | 92 |
1 files changed, 26 insertions, 66 deletions
diff --git a/cddl/contrib/opensolaris/cmd/dtrace/test/tst/common/funcs/tst.substr.d.out b/cddl/contrib/opensolaris/cmd/dtrace/test/tst/common/funcs/tst.substr.d.out index 5b498ef..d4087a2 100644 --- a/cddl/contrib/opensolaris/cmd/dtrace/test/tst/common/funcs/tst.substr.d.out +++ b/cddl/contrib/opensolaris/cmd/dtrace/test/tst/common/funcs/tst.substr.d.out @@ -1,7 +1,7 @@ #!/usr/perl5/bin/perl BEGIN { - if (substr("foobarbazbop", 3) ne "barbazbop") { + if (substr("foobarbazbop", 3) != "barbazbop") { printf("perl => substr(\"foobarbazbop\", 3) = \"%s\"\n", substr("foobarbazbop", 3)); printf(" D => substr(\"foobarbazbop\", 3) = \"%s\"\n", @@ -9,7 +9,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", 300) ne "") { + if (substr("foobarbazbop", 300) != "") { printf("perl => substr(\"foobarbazbop\", 300) = \"%s\"\n", substr("foobarbazbop", 300)); printf(" D => substr(\"foobarbazbop\", 300) = \"%s\"\n", @@ -17,7 +17,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", -10) ne "obarbazbop") { + if (substr("foobarbazbop", -10) != "obarbazbop") { printf("perl => substr(\"foobarbazbop\", -10) = \"%s\"\n", substr("foobarbazbop", -10)); printf(" D => substr(\"foobarbazbop\", -10) = \"%s\"\n", @@ -25,7 +25,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", 0) ne "foobarbazbop") { + if (substr("foobarbazbop", 0) != "foobarbazbop") { printf("perl => substr(\"foobarbazbop\", 0) = \"%s\"\n", substr("foobarbazbop", 0)); printf(" D => substr(\"foobarbazbop\", 0) = \"%s\"\n", @@ -33,7 +33,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", 1) ne "oobarbazbop") { + if (substr("foobarbazbop", 1) != "oobarbazbop") { printf("perl => substr(\"foobarbazbop\", 1) = \"%s\"\n", substr("foobarbazbop", 1)); printf(" D => substr(\"foobarbazbop\", 1) = \"%s\"\n", @@ -41,7 +41,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", 11) ne "p") { + if (substr("foobarbazbop", 11) != "p") { printf("perl => substr(\"foobarbazbop\", 11) = \"%s\"\n", substr("foobarbazbop", 11)); printf(" D => substr(\"foobarbazbop\", 11) = \"%s\"\n", @@ -49,7 +49,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", 12) ne "") { + if (substr("foobarbazbop", 12) != "") { printf("perl => substr(\"foobarbazbop\", 12) = \"%s\"\n", substr("foobarbazbop", 12)); printf(" D => substr(\"foobarbazbop\", 12) = \"%s\"\n", @@ -57,7 +57,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", 13) ne "") { + if (substr("foobarbazbop", 13) != "") { printf("perl => substr(\"foobarbazbop\", 13) = \"%s\"\n", substr("foobarbazbop", 13)); printf(" D => substr(\"foobarbazbop\", 13) = \"%s\"\n", @@ -65,7 +65,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", 8, 20) ne "zbop") { + if (substr("foobarbazbop", 8, 20) != "zbop") { printf("perl => substr(\"foobarbazbop\", 8, 20) = \"%s\"\n", substr("foobarbazbop", 8, 20)); printf(" D => substr(\"foobarbazbop\", 8, 20) = \"%s\"\n", @@ -73,7 +73,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", 4, 4) ne "arba") { + if (substr("foobarbazbop", 4, 4) != "arba") { printf("perl => substr(\"foobarbazbop\", 4, 4) = \"%s\"\n", substr("foobarbazbop", 4, 4)); printf(" D => substr(\"foobarbazbop\", 4, 4) = \"%s\"\n", @@ -81,7 +81,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", 5, 8) ne "rbazbop") { + if (substr("foobarbazbop", 5, 8) != "rbazbop") { printf("perl => substr(\"foobarbazbop\", 5, 8) = \"%s\"\n", substr("foobarbazbop", 5, 8)); printf(" D => substr(\"foobarbazbop\", 5, 8) = \"%s\"\n", @@ -89,7 +89,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", 5, 9) ne "rbazbop") { + if (substr("foobarbazbop", 5, 9) != "rbazbop") { printf("perl => substr(\"foobarbazbop\", 5, 9) = \"%s\"\n", substr("foobarbazbop", 5, 9)); printf(" D => substr(\"foobarbazbop\", 5, 9) = \"%s\"\n", @@ -97,7 +97,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", 400, 20) ne "") { + if (substr("foobarbazbop", 400, 20) != "") { printf("perl => substr(\"foobarbazbop\", 400, 20) = \"%s\"\n", substr("foobarbazbop", 400, 20)); printf(" D => substr(\"foobarbazbop\", 400, 20) = \"%s\"\n", @@ -105,7 +105,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", 400, 0) ne "") { + if (substr("foobarbazbop", 400, 0) != "") { printf("perl => substr(\"foobarbazbop\", 400, 0) = \"%s\"\n", substr("foobarbazbop", 400, 0)); printf(" D => substr(\"foobarbazbop\", 400, 0) = \"%s\"\n", @@ -113,7 +113,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", 400, -1) ne "") { + if (substr("foobarbazbop", 400, -1) != "") { printf("perl => substr(\"foobarbazbop\", 400, -1) = \"%s\"\n", substr("foobarbazbop", 400, -1)); printf(" D => substr(\"foobarbazbop\", 400, -1) = \"%s\"\n", @@ -121,7 +121,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", 3, 0) ne "") { + if (substr("foobarbazbop", 3, 0) != "") { printf("perl => substr(\"foobarbazbop\", 3, 0) = \"%s\"\n", substr("foobarbazbop", 3, 0)); printf(" D => substr(\"foobarbazbop\", 3, 0) = \"%s\"\n", @@ -129,39 +129,15 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", 3, -1) ne "barbazbo") { + if (substr("foobarbazbop", 3, -1) != "") { printf("perl => substr(\"foobarbazbop\", 3, -1) = \"%s\"\n", substr("foobarbazbop", 3, -1)); printf(" D => substr(\"foobarbazbop\", 3, -1) = \"%s\"\n", - "barbazbo"); - $failed++; - } - - if (substr("foobarbazbop", 3, -4) ne "barba") { - printf("perl => substr(\"foobarbazbop\", 3, -4) = \"%s\"\n", - substr("foobarbazbop", 3, -4)); - printf(" D => substr(\"foobarbazbop\", 3, -4) = \"%s\"\n", - "barba"); - $failed++; - } - - if (substr("foobarbazbop", 3, -20) ne "") { - printf("perl => substr(\"foobarbazbop\", 3, -20) = \"%s\"\n", - substr("foobarbazbop", 3, -20)); - printf(" D => substr(\"foobarbazbop\", 3, -20) = \"%s\"\n", ""); $failed++; } - if (substr("foobarbazbop", -10, -5) ne "obarb") { - printf("perl => substr(\"foobarbazbop\", -10, -5) = \"%s\"\n", - substr("foobarbazbop", -10, -5)); - printf(" D => substr(\"foobarbazbop\", -10, -5) = \"%s\"\n", - "obarb"); - $failed++; - } - - if (substr("foobarbazbop", 0, 400) ne "foobarbazbop") { + if (substr("foobarbazbop", 0, 400) != "foobarbazbop") { printf("perl => substr(\"foobarbazbop\", 0, 400) = \"%s\"\n", substr("foobarbazbop", 0, 400)); printf(" D => substr(\"foobarbazbop\", 0, 400) = \"%s\"\n", @@ -169,7 +145,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", -1, 400) ne "p") { + if (substr("foobarbazbop", -1, 400) != "p") { printf("perl => substr(\"foobarbazbop\", -1, 400) = \"%s\"\n", substr("foobarbazbop", -1, 400)); printf(" D => substr(\"foobarbazbop\", -1, 400) = \"%s\"\n", @@ -177,7 +153,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", -1, 0) ne "") { + if (substr("foobarbazbop", -1, 0) != "") { printf("perl => substr(\"foobarbazbop\", -1, 0) = \"%s\"\n", substr("foobarbazbop", -1, 0)); printf(" D => substr(\"foobarbazbop\", -1, 0) = \"%s\"\n", @@ -185,7 +161,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", -1, -1) ne "") { + if (substr("foobarbazbop", -1, -1) != "") { printf("perl => substr(\"foobarbazbop\", -1, -1) = \"%s\"\n", substr("foobarbazbop", -1, -1)); printf(" D => substr(\"foobarbazbop\", -1, -1) = \"%s\"\n", @@ -193,7 +169,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", -24, 24) ne "foobarbazbop") { + if (substr("foobarbazbop", -24, 24) != "foobarbazbop") { printf("perl => substr(\"foobarbazbop\", -24, 24) = \"%s\"\n", substr("foobarbazbop", -24, 24)); printf(" D => substr(\"foobarbazbop\", -24, 24) = \"%s\"\n", @@ -201,7 +177,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", -24, 12) ne "") { + if (substr("foobarbazbop", -24, 12) != "") { printf("perl => substr(\"foobarbazbop\", -24, 12) = \"%s\"\n", substr("foobarbazbop", -24, 12)); printf(" D => substr(\"foobarbazbop\", -24, 12) = \"%s\"\n", @@ -209,7 +185,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", -24, 13) ne "f") { + if (substr("foobarbazbop", -24, 13) != "f") { printf("perl => substr(\"foobarbazbop\", -24, 13) = \"%s\"\n", substr("foobarbazbop", -24, 13)); printf(" D => substr(\"foobarbazbop\", -24, 13) = \"%s\"\n", @@ -217,7 +193,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", -12, 12) ne "foobarbazbop") { + if (substr("foobarbazbop", -12, 12) != "foobarbazbop") { printf("perl => substr(\"foobarbazbop\", -12, 12) = \"%s\"\n", substr("foobarbazbop", -12, 12)); printf(" D => substr(\"foobarbazbop\", -12, 12) = \"%s\"\n", @@ -225,7 +201,7 @@ BEGIN { $failed++; } - if (substr("foobarbazbop", -12, 11) ne "foobarbazbo") { + if (substr("foobarbazbop", -12, 11) != "foobarbazbo") { printf("perl => substr(\"foobarbazbop\", -12, 11) = \"%s\"\n", substr("foobarbazbop", -12, 11)); printf(" D => substr(\"foobarbazbop\", -12, 11) = \"%s\"\n", @@ -233,22 +209,6 @@ BEGIN { $failed++; } - if (substr("CRAIG: Positioned them, I don't know... I'm fairly wide guy.", 100, 10) ne "") { - printf("perl => substr(\"CRAIG: Positioned them, I don't know... I'm fairly wide guy.\", 100, 10) = \"%s\"\n", - substr("CRAIG: Positioned them, I don't know... I'm fairly wide guy.", 100, 10)); - printf(" D => substr(\"CRAIG: Positioned them, I don't know... I'm fairly wide guy.\", 100, 10) = \"%s\"\n", - ""); - $failed++; - } - - if (substr("CRAIG: Positioned them, I don't know... I'm fairly wide guy.", 100) ne "") { - printf("perl => substr(\"CRAIG: Positioned them, I don't know... I'm fairly wide guy.\", 100) = \"%s\"\n", - substr("CRAIG: Positioned them, I don't know... I'm fairly wide guy.", 100)); - printf(" D => substr(\"CRAIG: Positioned them, I don't know... I'm fairly wide guy.\", 100) = \"%s\"\n", - ""); - $failed++; - } - exit($failed); } |