SF.net SVN: frontierkernel: [1241] ODBs/trunk/frontierRoot/suites/fUnit/testBugs/testOpFindNext129CharLimit.fvc

[<and...@us...>]

Revision: 1241
Author:   andreradke
Date:     2006-04-09 10:11:13 -0700 (Sun, 09 Apr 2006)
ViewCVS:  http://svn.sourceforge.net/frontierkernel/?rev=1241&view=rev

Log Message:
-----------
Enable line-ending conversion for new script fUnit.testBugs.testOpFindNext129CharLimit.

Modified Paths:
--------------
    ODBs/trunk/frontierRoot/suites/fUnit/testBugs/testOpFindNext129CharLimit.fvc

Property Changed:
----------------
    ODBs/trunk/frontierRoot/suites/fUnit/testBugs/testOpFindNext129CharLimit.fvc
Modified: ODBs/trunk/frontierRoot/suites/fUnit/testBugs/testOpFindNext129CharLimit.fvc
===================================================================
--- ODBs/trunk/frontierRoot/suites/fUnit/testBugs/testOpFindNext129CharLimit.fvc	2006-04-09 13:51:53 UTC (rev 1240)
+++ ODBs/trunk/frontierRoot/suites/fUnit/testBugs/testOpFindNext129CharLimit.fvc	2006-04-09 17:11:13 UTC (rev 1241)
@@ -1,30 +1,30 @@
-FrontierVcsFile:2:scpt:suites.fUnit.testBugs.testOpFindNext129CharLimit
-
-on testOpFindNext129CharLimit () {
-	«Bug Report
-		«op.findNext fails if the search pattern is longer than 129 chars
-		«More: http://sourceforge.net/tracker/index.php?func=detail&aid=1463056&group_id=120666&atid=687798
-	
-	on check (numChars) {
-		local (i, flfound, s = "", adroutline = @temp.fUnitTestOutline);
-		for i = 1 to 10 {
-			s = s + string.getRandomPassword (numChars + random (-10, 10)) + cr};
-		local (pat = string.getRandomPassword (numChars));
-		s = s + pat + cr;
-		s = s + string.getRandomPassword (random (0,10)) + pat + string.getRandomPassword (random (0,10)) + cr;
-		for i = 1 to 10 {
-			s = s + string.getRandomPassword (numChars + random (-10, 10)) + cr};
-		op.newOutlineObject (s, adroutline);
-		target.set (adroutline);
-		op.firstSummit ();
-		flfound = op.findNext (pat, false);
-		target.clear ();
-		assert (flfound)};
-	
-	check (128);
-	check (129);
-	check (130);
-	check (random (1, 255))};
-
-bundle { //debug code
+FrontierVcsFile:2:scpt:suites.fUnit.testBugs.testOpFindNext129CharLimit
+
+on testOpFindNext129CharLimit () {
+	«Bug Report
+		«op.findNext fails if the search pattern is longer than 129 chars
+		«More: http://sourceforge.net/tracker/index.php?func=detail&aid=1463056&group_id=120666&atid=687798
+	
+	on check (numChars) {
+		local (i, flfound, s = "", adroutline = @temp.fUnitTestOutline);
+		for i = 1 to 10 {
+			s = s + string.getRandomPassword (numChars + random (-10, 10)) + cr};
+		local (pat = string.getRandomPassword (numChars));
+		s = s + pat + cr;
+		s = s + string.getRandomPassword (random (0,10)) + pat + string.getRandomPassword (random (0,10)) + cr;
+		for i = 1 to 10 {
+			s = s + string.getRandomPassword (numChars + random (-10, 10)) + cr};
+		op.newOutlineObject (s, adroutline);
+		target.set (adroutline);
+		op.firstSummit ();
+		flfound = op.findNext (pat, false);
+		target.clear ();
+		assert (flfound)};
+	
+	check (128);
+	check (129);
+	check (130);
+	check (random (1, 255))};
+
+bundle { //debug code
 	fUnit.runners.run (parentOf(this^), testCaseToRun: this)}
\ No newline at end of file


Property changes on: ODBs/trunk/frontierRoot/suites/fUnit/testBugs/testOpFindNext129CharLimit.fvc
___________________________________________________________________
Name: svn:eol-style
   + native


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.