[Ttssh2-commit] [6635] random のテストだという事が判り易いように名前を変更

Back to archive index

svnno****@sourc***** svnno****@sourc*****
2017年 3月 16日 (木) 12:31:53 JST


Revision: 6635
          http://sourceforge.jp/projects/ttssh2/scm/svn/commits/6635
Author:   doda
Date:     2017-03-16 12:31:53 +0900 (Thu, 16 Mar 2017)
Log Message:
-----------
random のテストだという事が判り易いように名前を変更

Added Paths:
-----------
    trunk/tests/#35822-random.ttl

Removed Paths:
-------------
    trunk/tests/#35822.ttl

-------------- next part --------------
Copied: trunk/tests/#35822-random.ttl (from rev 6634, trunk/tests/#35822.ttl)
===================================================================
--- trunk/tests/#35822-random.ttl	                        (rev 0)
+++ trunk/tests/#35822-random.ttl	2017-03-16 03:31:53 UTC (rev 6635)
@@ -0,0 +1,25 @@
+intdim res 11
+
+for i 1 1000000
+	random val 10
+	res[val] = res[val] + 1
+next
+
+str = ''
+for i 0 10
+	sprintf2 tmp '%d\t%d' i res[i]
+	strconcat str tmp
+	strconcat str #13#10
+next
+strspecial str
+messagebox str 'result'
+
+uptime time
+int2str str_time time
+strconcat filename '35822_'
+strconcat filename str_time
+strconcat filename '.txt'
+
+fileopen fp filename 0
+filewrite fp str
+fileclose fp

Deleted: trunk/tests/#35822.ttl
===================================================================
--- trunk/tests/#35822.ttl	2017-03-16 03:31:50 UTC (rev 6634)
+++ trunk/tests/#35822.ttl	2017-03-16 03:31:53 UTC (rev 6635)
@@ -1,25 +0,0 @@
-intdim res 11
-
-for i 1 1000000
-	random val 10
-	res[val] = res[val] + 1
-next
-
-str = ''
-for i 0 10
-	sprintf2 tmp '%d\t%d' i res[i]
-	strconcat str tmp
-	strconcat str #13#10
-next
-strspecial str
-messagebox str 'result'
-
-uptime time
-int2str str_time time
-strconcat filename '35822_'
-strconcat filename str_time
-strconcat filename '.txt'
-
-fileopen fp filename 0
-filewrite fp str
-fileclose fp



Ttssh2-commit メーリングリストの案内
Back to archive index