diff --git a/benchmark/string2.gbs b/benchmark/string2.gbs
index 1ee4b6da6..d9000b4f7 100755
--- a/benchmark/string2.gbs
+++ b/benchmark/string2.gbs
@@ -1,21 +1,17 @@
 #!/usr/bin/env gbs3
 
-Public Sub Main()
+Dim S As String
+Dim I As Integer
+Dim C As String
+Dim J As Integer
 
-	Dim S As String
-  Dim I As Integer
-  Dim C As String
-  Dim J As Integer
-
-  For I = 1 To 1000000
-    For J = 65 To 90
-      C = Chr$(J)
-      S &= ".(" & C & ")"
-    Next
-  Next
-  
-  Print Len(S)
-  
-End
+For I = 1 To 1000000
+	For J = 65 To 90
+		C = Chr$(J)
+		S &= ".(" & C & ")"
+	Next
+Next
 
+Print Len(S)
 Error CStr(Jit.Time)
+