diff --git a/src/benchmark/run.ts b/src/benchmark/run.ts
index c4ecaab..b896f90 100644
--- a/src/benchmark/run.ts
+++ b/src/benchmark/run.ts
@@ -64,12 +64,12 @@ async function go() {
// {
// name: 'Elm Core',
// dir: 'testcases/core',
- // elmFile: 'Main.elm',
+ // elmFile: 'V8/Benchmark.elm',
// },
// {
// name: 'Elm CSS',
// dir: 'testcases/elm-css',
- // elmFile: 'Main.elm',
+ // elmFile: 'V8/Benchmark.elm',
// },
{
name: 'Html',
@@ -79,28 +79,28 @@ async function go() {
// {
// name: 'Elm UI',
// dir: 'testcases/elm-ui',
- // elmFile: 'Main.elm',
+ // elmFile: 'V8/Benchmark.elm',
// },
// {
// name: 'Elm UI 2',
// dir: 'testcases/elm-ui-2',
- // elmFile: 'Main.elm',
+ // elmFile: 'V8/Benchmark.elm',
// },
// {
// name: 'elm-animator',
// dir: 'testcases/elm-animator',
- // elmFile: 'Run.elm',
+ // elmFile: 'V8/Benchmark.elm',
// },
// {
// name: 'Elm Markdown',
// dir: 'testcases/elm-markdown',
- // elmFile: 'Run.elm',
+ // elmFile: 'V8/Benchmark.elm',
// },
// // // This one takes forever
// {
// name: 'elm-obj-file',
// dir: 'testcases/elm-obj-file',
- // elmFile: 'Run.elm',
+ // elmFile: 'V8/Benchmark.elm',
// },
]);
const result = await report;
diff --git a/testcases/arityexplorer/Main.elm b/testcases/arityexplorer/Suite.elm
similarity index 63%
rename from testcases/arityexplorer/Main.elm
rename to testcases/arityexplorer/Suite.elm
index 5a4b468..a4c1f6f 100644
--- a/testcases/arityexplorer/Main.elm
+++ b/testcases/arityexplorer/Suite.elm
@@ -1,24 +1,10 @@
-port module Main exposing (main)
+module Suite exposing (suite)
{-| -}
import Benchmark exposing (..)
-import Benchmark.Runner exposing (BenchmarkProgram, program)
-import Benchmark.Runner.Json
-import Dict
-import Html
-import Json.Decode
-import Json.Encode
-import List
-main : Benchmark.Runner.Json.JsonBenchmark
-main =
- Benchmark.Runner.Json.program reportResults suite
-
-
-port reportResults : Json.Encode.Value -> Cmd msg
-
type MyType
= Zero
diff --git a/testcases/arityexplorer/V8/Benchmark.elm b/testcases/arityexplorer/V8/Benchmark.elm
new file mode 100644
index 0000000..48f0436
--- /dev/null
+++ b/testcases/arityexplorer/V8/Benchmark.elm
@@ -0,0 +1,14 @@
+port module V8.Benchmark exposing (main)
+
+{-| -}
+
+
+import Benchmark.Runner.Json
+import Suite
+import Json.Encode
+
+main : Benchmark.Runner.Json.JsonBenchmark
+main =
+ Benchmark.Runner.Json.program reportResults Suite.suite
+
+port reportResults : Json.Encode.Value -> Cmd msg
diff --git a/testcases/arityexplorer/V8/Benchmark/Runner/Json.elm b/testcases/arityexplorer/V8/Benchmark/Runner/Json.elm
new file mode 100644
index 0000000..48f0436
--- /dev/null
+++ b/testcases/arityexplorer/V8/Benchmark/Runner/Json.elm
@@ -0,0 +1,14 @@
+port module V8.Benchmark exposing (main)
+
+{-| -}
+
+
+import Benchmark.Runner.Json
+import Suite
+import Json.Encode
+
+main : Benchmark.Runner.Json.JsonBenchmark
+main =
+ Benchmark.Runner.Json.program reportResults Suite.suite
+
+port reportResults : Json.Encode.Value -> Cmd msg
diff --git a/testcases/arityexplorer/V8/Debug.elm b/testcases/arityexplorer/V8/Debug.elm
new file mode 100644
index 0000000..f3275b3
--- /dev/null
+++ b/testcases/arityexplorer/V8/Debug.elm
@@ -0,0 +1,64 @@
+module V8.Debug exposing (memory, optimizationStatus, reportV8StatusForBenchmarks)
+
+{-| -}
+
+import Json.Encode
+
+
+memory : String -> a -> a
+memory tag value =
+ value
+
+
+type Status
+ = Status Int
+
+
+optimizationStatus : String -> a -> a
+optimizationStatus tag value =
+ value
+
+
+{-|
+
+ hasFastProperties obj
+
+ hasFastSmiElements obj
+
+ hasFastObjectElements obj
+
+ hasFastDoubleElements obj
+
+ hasDictionaryElements obj
+
+ hasFastHoleyElements obj
+
+ haveSameMap ( obj1, obj2 )
+
+ isValidSmi obj
+
+ isSmi obj
+
+ hasFastSmiOrObjectElements obj
+
+ hasSloppyArgumentsElements obj
+
+-}
+type alias Memory =
+ { tag : String
+ , hasFastProperties : Bool
+ , hasFastSmiElements : Bool
+ , hasFastObjectElements : Bool
+ , hasFastDoubleElements : Bool
+ , hasDictionaryElements : Bool
+ , hasFastHoleyElements : Bool
+ , isValidSmi : Bool
+ , isSmi : Bool
+ , hasFastSmiOrObjectElements : Bool
+ , hasSloppyArgumentsElements : Bool
+ }
+
+
+reportV8StatusForBenchmarks : () -> Json.Encode.Value
+reportV8StatusForBenchmarks _ =
+ Json.Encode.null
diff --git a/testcases/arityexplorer/standard.html b/testcases/arityexplorer/standard.html
deleted file mode 100644
index f076b31..0000000
--- a/testcases/arityexplorer/standard.html
+++ /dev/null
@@ -1,22 +0,0 @@
-
-
-
- Main
-
-
-
-
-
-
-
-
diff --git a/testcases/arityexplorer/transformed.html b/testcases/arityexplorer/transformed.html
deleted file mode 100644
index 5b8d016..0000000
--- a/testcases/arityexplorer/transformed.html
+++ /dev/null
@@ -1,21 +0,0 @@
-
-
-
- Main
-
-
-
-
-
-
-
-
diff --git a/testcases/core/Main.elm b/testcases/core/Suite.elm
similarity index 95%
rename from testcases/core/Main.elm
rename to testcases/core/Suite.elm
index 24f8db4..b8289c2 100644
--- a/testcases/core/Main.elm
+++ b/testcases/core/Suite.elm
@@ -1,25 +1,13 @@
-port module Main exposing (main)
+module Suite exposing (suite)
{-| -}
import Benchmark exposing (..)
-import Benchmark.Runner exposing (BenchmarkProgram, program)
-import Benchmark.Runner.Json
import Dict
-import Html
-import Json.Decode
import Json.Encode
import List
-main : Benchmark.Runner.Json.JsonBenchmark
-main =
- Benchmark.Runner.Json.program reportResults suite
-
-
-port reportResults : Json.Encode.Value -> Cmd msg
-
-
type MyType
= Zero
| One Int
diff --git a/testcases/core/V8/Benchmark.elm b/testcases/core/V8/Benchmark.elm
new file mode 100644
index 0000000..48f0436
--- /dev/null
+++ b/testcases/core/V8/Benchmark.elm
@@ -0,0 +1,14 @@
+port module V8.Benchmark exposing (main)
+
+{-| -}
+
+
+import Benchmark.Runner.Json
+import Suite
+import Json.Encode
+
+main : Benchmark.Runner.Json.JsonBenchmark
+main =
+ Benchmark.Runner.Json.program reportResults Suite.suite
+
+port reportResults : Json.Encode.Value -> Cmd msg
diff --git a/testcases/core/V8/Benchmark/Runner/Json.elm b/testcases/core/V8/Benchmark/Runner/Json.elm
new file mode 100644
index 0000000..48f0436
--- /dev/null
+++ b/testcases/core/V8/Benchmark/Runner/Json.elm
@@ -0,0 +1,14 @@
+port module V8.Benchmark exposing (main)
+
+{-| -}
+
+
+import Benchmark.Runner.Json
+import Suite
+import Json.Encode
+
+main : Benchmark.Runner.Json.JsonBenchmark
+main =
+ Benchmark.Runner.Json.program reportResults Suite.suite
+
+port reportResults : Json.Encode.Value -> Cmd msg
diff --git a/testcases/core/V8/Debug.elm b/testcases/core/V8/Debug.elm
new file mode 100644
index 0000000..f3275b3
--- /dev/null
+++ b/testcases/core/V8/Debug.elm
@@ -0,0 +1,64 @@
+module V8.Debug exposing (memory, optimizationStatus, reportV8StatusForBenchmarks)
+
+{-| -}
+
+import Json.Encode
+
+
+memory : String -> a -> a
+memory tag value =
+ value
+
+
+type Status
+ = Status Int
+
+
+optimizationStatus : String -> a -> a
+optimizationStatus tag value =
+ value
+
+
+{-|
+
+ hasFastProperties obj
+
+ hasFastSmiElements obj
+
+ hasFastObjectElements obj
+
+ hasFastDoubleElements obj
+
+ hasDictionaryElements obj
+
+ hasFastHoleyElements obj
+
+ haveSameMap ( obj1, obj2 )
+
+ isValidSmi obj
+
+ isSmi obj
+
+ hasFastSmiOrObjectElements obj
+
+ hasSloppyArgumentsElements obj
+
+-}
+type alias Memory =
+ { tag : String
+ , hasFastProperties : Bool
+ , hasFastSmiElements : Bool
+ , hasFastObjectElements : Bool
+ , hasFastDoubleElements : Bool
+ , hasDictionaryElements : Bool
+ , hasFastHoleyElements : Bool
+ , isValidSmi : Bool
+ , isSmi : Bool
+ , hasFastSmiOrObjectElements : Bool
+ , hasSloppyArgumentsElements : Bool
+ }
+
+
+reportV8StatusForBenchmarks : () -> Json.Encode.Value
+reportV8StatusForBenchmarks _ =
+ Json.Encode.null
diff --git a/testcases/core/standard.html b/testcases/core/standard.html
deleted file mode 100644
index f076b31..0000000
--- a/testcases/core/standard.html
+++ /dev/null
@@ -1,22 +0,0 @@
-
-
-
- Main
-
-
-
-
-
-
-
-
diff --git a/testcases/core/transformed.html b/testcases/core/transformed.html
deleted file mode 100644
index 5b8d016..0000000
--- a/testcases/core/transformed.html
+++ /dev/null
@@ -1,21 +0,0 @@
-
-
-
- Main
-
-
-
-
-
-
-
-
diff --git a/testcases/elm-animator/Run.elm b/testcases/elm-animator/Run.elm
deleted file mode 100644
index 66c24d9..0000000
--- a/testcases/elm-animator/Run.elm
+++ /dev/null
@@ -1,18 +0,0 @@
-port module Run exposing (main)
-
-{-| -}
-
-import Benchmark exposing (..)
-import Benchmark.Runner exposing (BenchmarkProgram, program)
-import Benchmark.Runner.Json
-import Benchmarks
-import Html
-import Json.Encode
-
-
-main : Benchmark.Runner.Json.JsonBenchmark
-main =
- Benchmark.Runner.Json.program reportResults Benchmarks.suite
-
-
-port reportResults : Json.Encode.Value -> Cmd msg
diff --git a/testcases/elm-animator/Suite.elm b/testcases/elm-animator/Suite.elm
new file mode 100644
index 0000000..fd54348
--- /dev/null
+++ b/testcases/elm-animator/Suite.elm
@@ -0,0 +1,8 @@
+module Suite exposing (suite)
+
+{-| -}
+
+import Benchmarks
+
+suite = Benchmarks.suite
+
diff --git a/testcases/elm-animator/V8/Benchmark.elm b/testcases/elm-animator/V8/Benchmark.elm
new file mode 100644
index 0000000..48f0436
--- /dev/null
+++ b/testcases/elm-animator/V8/Benchmark.elm
@@ -0,0 +1,14 @@
+port module V8.Benchmark exposing (main)
+
+{-| -}
+
+
+import Benchmark.Runner.Json
+import Suite
+import Json.Encode
+
+main : Benchmark.Runner.Json.JsonBenchmark
+main =
+ Benchmark.Runner.Json.program reportResults Suite.suite
+
+port reportResults : Json.Encode.Value -> Cmd msg
diff --git a/testcases/elm-animator/V8/Benchmark/Runner/Json.elm b/testcases/elm-animator/V8/Benchmark/Runner/Json.elm
new file mode 100644
index 0000000..48f0436
--- /dev/null
+++ b/testcases/elm-animator/V8/Benchmark/Runner/Json.elm
@@ -0,0 +1,14 @@
+port module V8.Benchmark exposing (main)
+
+{-| -}
+
+
+import Benchmark.Runner.Json
+import Suite
+import Json.Encode
+
+main : Benchmark.Runner.Json.JsonBenchmark
+main =
+ Benchmark.Runner.Json.program reportResults Suite.suite
+
+port reportResults : Json.Encode.Value -> Cmd msg
diff --git a/testcases/elm-animator/V8/Debug.elm b/testcases/elm-animator/V8/Debug.elm
new file mode 100644
index 0000000..f3275b3
--- /dev/null
+++ b/testcases/elm-animator/V8/Debug.elm
@@ -0,0 +1,64 @@
+module V8.Debug exposing (memory, optimizationStatus, reportV8StatusForBenchmarks)
+
+{-| -}
+
+import Json.Encode
+
+
+memory : String -> a -> a
+memory tag value =
+ value
+
+
+type Status
+ = Status Int
+
+
+optimizationStatus : String -> a -> a
+optimizationStatus tag value =
+ value
+
+
+{-|
+
+ hasFastProperties obj
+
+ hasFastSmiElements obj
+
+ hasFastObjectElements obj
+
+ hasFastDoubleElements obj
+
+ hasDictionaryElements obj
+
+ hasFastHoleyElements obj
+
+ haveSameMap ( obj1, obj2 )
+
+ isValidSmi obj
+
+ isSmi obj
+
+ hasFastSmiOrObjectElements obj
+
+ hasSloppyArgumentsElements obj
+
+-}
+type alias Memory =
+ { tag : String
+ , hasFastProperties : Bool
+ , hasFastSmiElements : Bool
+ , hasFastObjectElements : Bool
+ , hasFastDoubleElements : Bool
+ , hasDictionaryElements : Bool
+ , hasFastHoleyElements : Bool
+ , isValidSmi : Bool
+ , isSmi : Bool
+ , hasFastSmiOrObjectElements : Bool
+ , hasSloppyArgumentsElements : Bool
+ }
+
+
+reportV8StatusForBenchmarks : () -> Json.Encode.Value
+reportV8StatusForBenchmarks _ =
+ Json.Encode.null
diff --git a/testcases/elm-css/Main.elm b/testcases/elm-css/Suite.elm
similarity index 69%
rename from testcases/elm-css/Main.elm
rename to testcases/elm-css/Suite.elm
index b962e2d..cf6ae82 100644
--- a/testcases/elm-css/Main.elm
+++ b/testcases/elm-css/Suite.elm
@@ -1,23 +1,12 @@
-port module Main exposing (main)
+module Suite exposing (suite)
{-| -}
import Benchmark exposing (..)
-import Benchmark.Runner exposing (BenchmarkProgram, program)
-import Benchmark.Runner.Json
import Css exposing (..)
import Html.Styled exposing (..)
-import Html.Styled.Attributes exposing (css, href, src)
-import Json.Encode
-main : Benchmark.Runner.Json.JsonBenchmark
-main =
- Benchmark.Runner.Json.program reportResults suite
-
-
-port reportResults : Json.Encode.Value -> Cmd msg
-
three =
List.repeat 3 0
diff --git a/testcases/elm-css/V8/Benchmark.elm b/testcases/elm-css/V8/Benchmark.elm
new file mode 100644
index 0000000..48f0436
--- /dev/null
+++ b/testcases/elm-css/V8/Benchmark.elm
@@ -0,0 +1,14 @@
+port module V8.Benchmark exposing (main)
+
+{-| -}
+
+
+import Benchmark.Runner.Json
+import Suite
+import Json.Encode
+
+main : Benchmark.Runner.Json.JsonBenchmark
+main =
+ Benchmark.Runner.Json.program reportResults Suite.suite
+
+port reportResults : Json.Encode.Value -> Cmd msg
diff --git a/testcases/elm-css/V8/Benchmark/Runner/Json.elm b/testcases/elm-css/V8/Benchmark/Runner/Json.elm
new file mode 100644
index 0000000..48f0436
--- /dev/null
+++ b/testcases/elm-css/V8/Benchmark/Runner/Json.elm
@@ -0,0 +1,14 @@
+port module V8.Benchmark exposing (main)
+
+{-| -}
+
+
+import Benchmark.Runner.Json
+import Suite
+import Json.Encode
+
+main : Benchmark.Runner.Json.JsonBenchmark
+main =
+ Benchmark.Runner.Json.program reportResults Suite.suite
+
+port reportResults : Json.Encode.Value -> Cmd msg
diff --git a/testcases/elm-css/V8/Debug.elm b/testcases/elm-css/V8/Debug.elm
new file mode 100644
index 0000000..f3275b3
--- /dev/null
+++ b/testcases/elm-css/V8/Debug.elm
@@ -0,0 +1,64 @@
+module V8.Debug exposing (memory, optimizationStatus, reportV8StatusForBenchmarks)
+
+{-| -}
+
+import Json.Encode
+
+
+memory : String -> a -> a
+memory tag value =
+ value
+
+
+type Status
+ = Status Int
+
+
+optimizationStatus : String -> a -> a
+optimizationStatus tag value =
+ value
+
+
+{-|
+
+ hasFastProperties obj
+
+ hasFastSmiElements obj
+
+ hasFastObjectElements obj
+
+ hasFastDoubleElements obj
+
+ hasDictionaryElements obj
+
+ hasFastHoleyElements obj
+
+ haveSameMap ( obj1, obj2 )
+
+ isValidSmi obj
+
+ isSmi obj
+
+ hasFastSmiOrObjectElements obj
+
+ hasSloppyArgumentsElements obj
+
+-}
+type alias Memory =
+ { tag : String
+ , hasFastProperties : Bool
+ , hasFastSmiElements : Bool
+ , hasFastObjectElements : Bool
+ , hasFastDoubleElements : Bool
+ , hasDictionaryElements : Bool
+ , hasFastHoleyElements : Bool
+ , isValidSmi : Bool
+ , isSmi : Bool
+ , hasFastSmiOrObjectElements : Bool
+ , hasSloppyArgumentsElements : Bool
+ }
+
+
+reportV8StatusForBenchmarks : () -> Json.Encode.Value
+reportV8StatusForBenchmarks _ =
+ Json.Encode.null
diff --git a/testcases/elm-css/standard.html b/testcases/elm-css/standard.html
deleted file mode 100644
index f076b31..0000000
--- a/testcases/elm-css/standard.html
+++ /dev/null
@@ -1,22 +0,0 @@
-
-
-
- Main
-
-
-
-
-
-
-
-
diff --git a/testcases/elm-css/transformed.html b/testcases/elm-css/transformed.html
deleted file mode 100644
index 5b8d016..0000000
--- a/testcases/elm-css/transformed.html
+++ /dev/null
@@ -1,21 +0,0 @@
-
-
-
- Main
-
-
-
-
-
-
-
-
diff --git a/testcases/elm-markdown/Run.elm b/testcases/elm-markdown/Run.elm
deleted file mode 100644
index 66c24d9..0000000
--- a/testcases/elm-markdown/Run.elm
+++ /dev/null
@@ -1,18 +0,0 @@
-port module Run exposing (main)
-
-{-| -}
-
-import Benchmark exposing (..)
-import Benchmark.Runner exposing (BenchmarkProgram, program)
-import Benchmark.Runner.Json
-import Benchmarks
-import Html
-import Json.Encode
-
-
-main : Benchmark.Runner.Json.JsonBenchmark
-main =
- Benchmark.Runner.Json.program reportResults Benchmarks.suite
-
-
-port reportResults : Json.Encode.Value -> Cmd msg
diff --git a/testcases/elm-markdown/Suite.elm b/testcases/elm-markdown/Suite.elm
new file mode 100644
index 0000000..f8727f2
--- /dev/null
+++ b/testcases/elm-markdown/Suite.elm
@@ -0,0 +1,12 @@
+module Suite exposing (suite)
+
+{-| -}
+
+
+import Benchmarks
+
+
+suite =
+ Benchmarks.suite
+
+
diff --git a/testcases/elm-markdown/V8/Benchmark.elm b/testcases/elm-markdown/V8/Benchmark.elm
new file mode 100644
index 0000000..48f0436
--- /dev/null
+++ b/testcases/elm-markdown/V8/Benchmark.elm
@@ -0,0 +1,14 @@
+port module V8.Benchmark exposing (main)
+
+{-| -}
+
+
+import Benchmark.Runner.Json
+import Suite
+import Json.Encode
+
+main : Benchmark.Runner.Json.JsonBenchmark
+main =
+ Benchmark.Runner.Json.program reportResults Suite.suite
+
+port reportResults : Json.Encode.Value -> Cmd msg
diff --git a/testcases/elm-markdown/V8/Benchmark/Runner/Json.elm b/testcases/elm-markdown/V8/Benchmark/Runner/Json.elm
new file mode 100644
index 0000000..48f0436
--- /dev/null
+++ b/testcases/elm-markdown/V8/Benchmark/Runner/Json.elm
@@ -0,0 +1,14 @@
+port module V8.Benchmark exposing (main)
+
+{-| -}
+
+
+import Benchmark.Runner.Json
+import Suite
+import Json.Encode
+
+main : Benchmark.Runner.Json.JsonBenchmark
+main =
+ Benchmark.Runner.Json.program reportResults Suite.suite
+
+port reportResults : Json.Encode.Value -> Cmd msg
diff --git a/testcases/elm-markdown/V8/Debug.elm b/testcases/elm-markdown/V8/Debug.elm
new file mode 100644
index 0000000..f3275b3
--- /dev/null
+++ b/testcases/elm-markdown/V8/Debug.elm
@@ -0,0 +1,64 @@
+module V8.Debug exposing (memory, optimizationStatus, reportV8StatusForBenchmarks)
+
+{-| -}
+
+import Json.Encode
+
+
+memory : String -> a -> a
+memory tag value =
+ value
+
+
+type Status
+ = Status Int
+
+
+optimizationStatus : String -> a -> a
+optimizationStatus tag value =
+ value
+
+
+{-|
+
+ hasFastProperties obj
+
+ hasFastSmiElements obj
+
+ hasFastObjectElements obj
+
+ hasFastDoubleElements obj
+
+ hasDictionaryElements obj
+
+ hasFastHoleyElements obj
+
+ haveSameMap ( obj1, obj2 )
+
+ isValidSmi obj
+
+ isSmi obj
+
+ hasFastSmiOrObjectElements obj
+
+ hasSloppyArgumentsElements obj
+
+-}
+type alias Memory =
+ { tag : String
+ , hasFastProperties : Bool
+ , hasFastSmiElements : Bool
+ , hasFastObjectElements : Bool
+ , hasFastDoubleElements : Bool
+ , hasDictionaryElements : Bool
+ , hasFastHoleyElements : Bool
+ , isValidSmi : Bool
+ , isSmi : Bool
+ , hasFastSmiOrObjectElements : Bool
+ , hasSloppyArgumentsElements : Bool
+ }
+
+
+reportV8StatusForBenchmarks : () -> Json.Encode.Value
+reportV8StatusForBenchmarks _ =
+ Json.Encode.null
diff --git a/testcases/elm-markdown/standard.html b/testcases/elm-markdown/standard.html
deleted file mode 100644
index 6837481..0000000
--- a/testcases/elm-markdown/standard.html
+++ /dev/null
@@ -1,22 +0,0 @@
-
-
-
- Main
-
-
-
-
-
-
-
-
diff --git a/testcases/elm-markdown/transformed.html b/testcases/elm-markdown/transformed.html
deleted file mode 100644
index a872303..0000000
--- a/testcases/elm-markdown/transformed.html
+++ /dev/null
@@ -1,21 +0,0 @@
-
-
-
- Main
-
-
-
-
-
-
-
-
diff --git a/testcases/elm-obj-file/Run.elm b/testcases/elm-obj-file/Suite.elm
similarity index 99%
rename from testcases/elm-obj-file/Run.elm
rename to testcases/elm-obj-file/Suite.elm
index b6474aa..c4c5407 100644
--- a/testcases/elm-obj-file/Run.elm
+++ b/testcases/elm-obj-file/Suite.elm
@@ -1,4 +1,4 @@
-port module Run exposing (main)
+module Suite exposing (suite)
{-| -}
@@ -11,12 +11,6 @@ import Length
import Obj.Decode
-main : Benchmark.Runner.Json.JsonBenchmark
-main =
- Benchmark.Runner.Json.program reportResults suite
-
-
-port reportResults : Json.Encode.Value -> Cmd msg
suite =
diff --git a/testcases/elm-obj-file/V8/Benchmark.elm b/testcases/elm-obj-file/V8/Benchmark.elm
new file mode 100644
index 0000000..48f0436
--- /dev/null
+++ b/testcases/elm-obj-file/V8/Benchmark.elm
@@ -0,0 +1,14 @@
+port module V8.Benchmark exposing (main)
+
+{-| -}
+
+
+import Benchmark.Runner.Json
+import Suite
+import Json.Encode
+
+main : Benchmark.Runner.Json.JsonBenchmark
+main =
+ Benchmark.Runner.Json.program reportResults Suite.suite
+
+port reportResults : Json.Encode.Value -> Cmd msg
diff --git a/testcases/elm-obj-file/V8/Benchmark/Runner/Json.elm b/testcases/elm-obj-file/V8/Benchmark/Runner/Json.elm
new file mode 100644
index 0000000..48f0436
--- /dev/null
+++ b/testcases/elm-obj-file/V8/Benchmark/Runner/Json.elm
@@ -0,0 +1,14 @@
+port module V8.Benchmark exposing (main)
+
+{-| -}
+
+
+import Benchmark.Runner.Json
+import Suite
+import Json.Encode
+
+main : Benchmark.Runner.Json.JsonBenchmark
+main =
+ Benchmark.Runner.Json.program reportResults Suite.suite
+
+port reportResults : Json.Encode.Value -> Cmd msg
diff --git a/testcases/elm-obj-file/V8/Debug.elm b/testcases/elm-obj-file/V8/Debug.elm
new file mode 100644
index 0000000..f3275b3
--- /dev/null
+++ b/testcases/elm-obj-file/V8/Debug.elm
@@ -0,0 +1,64 @@
+module V8.Debug exposing (memory, optimizationStatus, reportV8StatusForBenchmarks)
+
+{-| -}
+
+import Json.Encode
+
+
+memory : String -> a -> a
+memory tag value =
+ value
+
+
+type Status
+ = Status Int
+
+
+optimizationStatus : String -> a -> a
+optimizationStatus tag value =
+ value
+
+
+{-|
+
+ hasFastProperties obj
+
+ hasFastSmiElements obj
+
+ hasFastObjectElements obj
+
+ hasFastDoubleElements obj
+
+ hasDictionaryElements obj
+
+ hasFastHoleyElements obj
+
+ haveSameMap ( obj1, obj2 )
+
+ isValidSmi obj
+
+ isSmi obj
+
+ hasFastSmiOrObjectElements obj
+
+ hasSloppyArgumentsElements obj
+
+-}
+type alias Memory =
+ { tag : String
+ , hasFastProperties : Bool
+ , hasFastSmiElements : Bool
+ , hasFastObjectElements : Bool
+ , hasFastDoubleElements : Bool
+ , hasDictionaryElements : Bool
+ , hasFastHoleyElements : Bool
+ , isValidSmi : Bool
+ , isSmi : Bool
+ , hasFastSmiOrObjectElements : Bool
+ , hasSloppyArgumentsElements : Bool
+ }
+
+
+reportV8StatusForBenchmarks : () -> Json.Encode.Value
+reportV8StatusForBenchmarks _ =
+ Json.Encode.null
diff --git a/testcases/elm-obj-file/standard.html b/testcases/elm-obj-file/standard.html
deleted file mode 100644
index 6837481..0000000
--- a/testcases/elm-obj-file/standard.html
+++ /dev/null
@@ -1,22 +0,0 @@
-
-
-
- Main
-
-
-
-
-
-
-
-
diff --git a/testcases/elm-obj-file/transformed.html b/testcases/elm-obj-file/transformed.html
deleted file mode 100644
index a872303..0000000
--- a/testcases/elm-obj-file/transformed.html
+++ /dev/null
@@ -1,21 +0,0 @@
-
-
-
- Main
-
-
-
-
-
-
-
-
diff --git a/testcases/elm-ui-2/Main.elm b/testcases/elm-ui-2/Suite.elm
similarity index 65%
rename from testcases/elm-ui-2/Main.elm
rename to testcases/elm-ui-2/Suite.elm
index 1f6ce06..58cb1db 100644
--- a/testcases/elm-ui-2/Main.elm
+++ b/testcases/elm-ui-2/Suite.elm
@@ -1,25 +1,16 @@
-port module Main exposing (main)
+module Suite exposing (suite)
{-| -}
import Benchmark exposing (..)
-import Benchmark.Runner exposing (BenchmarkProgram, program)
-import Benchmark.Runner.Json
+
import Element2 exposing (..)
import Element2.Background as Background
import Element2.Font as Font
-import Html
-import Html.Attributes as Attr
-import Json.Encode
-main : Benchmark.Runner.Json.JsonBenchmark
-main =
- Benchmark.Runner.Json.program reportResults suite
-port reportResults : Json.Encode.Value -> Cmd msg
-
three =
List.repeat 3 0
diff --git a/testcases/elm-ui-2/V8/Benchmark.elm b/testcases/elm-ui-2/V8/Benchmark.elm
new file mode 100644
index 0000000..48f0436
--- /dev/null
+++ b/testcases/elm-ui-2/V8/Benchmark.elm
@@ -0,0 +1,14 @@
+port module V8.Benchmark exposing (main)
+
+{-| -}
+
+
+import Benchmark.Runner.Json
+import Suite
+import Json.Encode
+
+main : Benchmark.Runner.Json.JsonBenchmark
+main =
+ Benchmark.Runner.Json.program reportResults Suite.suite
+
+port reportResults : Json.Encode.Value -> Cmd msg
diff --git a/testcases/elm-ui-2/V8/Benchmark/Runner/Json.elm b/testcases/elm-ui-2/V8/Benchmark/Runner/Json.elm
new file mode 100644
index 0000000..48f0436
--- /dev/null
+++ b/testcases/elm-ui-2/V8/Benchmark/Runner/Json.elm
@@ -0,0 +1,14 @@
+port module V8.Benchmark exposing (main)
+
+{-| -}
+
+
+import Benchmark.Runner.Json
+import Suite
+import Json.Encode
+
+main : Benchmark.Runner.Json.JsonBenchmark
+main =
+ Benchmark.Runner.Json.program reportResults Suite.suite
+
+port reportResults : Json.Encode.Value -> Cmd msg
diff --git a/testcases/elm-ui-2/V8/Debug.elm b/testcases/elm-ui-2/V8/Debug.elm
new file mode 100644
index 0000000..f3275b3
--- /dev/null
+++ b/testcases/elm-ui-2/V8/Debug.elm
@@ -0,0 +1,64 @@
+module V8.Debug exposing (memory, optimizationStatus, reportV8StatusForBenchmarks)
+
+{-| -}
+
+import Json.Encode
+
+
+memory : String -> a -> a
+memory tag value =
+ value
+
+
+type Status
+ = Status Int
+
+
+optimizationStatus : String -> a -> a
+optimizationStatus tag value =
+ value
+
+
+{-|
+
+ hasFastProperties obj
+
+ hasFastSmiElements obj
+
+ hasFastObjectElements obj
+
+ hasFastDoubleElements obj
+
+ hasDictionaryElements obj
+
+ hasFastHoleyElements obj
+
+ haveSameMap ( obj1, obj2 )
+
+ isValidSmi obj
+
+ isSmi obj
+
+ hasFastSmiOrObjectElements obj
+
+ hasSloppyArgumentsElements obj
+
+-}
+type alias Memory =
+ { tag : String
+ , hasFastProperties : Bool
+ , hasFastSmiElements : Bool
+ , hasFastObjectElements : Bool
+ , hasFastDoubleElements : Bool
+ , hasDictionaryElements : Bool
+ , hasFastHoleyElements : Bool
+ , isValidSmi : Bool
+ , isSmi : Bool
+ , hasFastSmiOrObjectElements : Bool
+ , hasSloppyArgumentsElements : Bool
+ }
+
+
+reportV8StatusForBenchmarks : () -> Json.Encode.Value
+reportV8StatusForBenchmarks _ =
+ Json.Encode.null
diff --git a/testcases/elm-ui-2/standard.html b/testcases/elm-ui-2/standard.html
deleted file mode 100644
index f076b31..0000000
--- a/testcases/elm-ui-2/standard.html
+++ /dev/null
@@ -1,22 +0,0 @@
-
-
-
- Main
-
-
-
-
-
-
-
-
diff --git a/testcases/elm-ui-2/transformed.html b/testcases/elm-ui-2/transformed.html
deleted file mode 100644
index 5b8d016..0000000
--- a/testcases/elm-ui-2/transformed.html
+++ /dev/null
@@ -1,21 +0,0 @@
-
-
-
- Main
-
-
-
-
-
-
-
-
diff --git a/testcases/elm-ui/Main.elm b/testcases/elm-ui/Suite.elm
similarity index 65%
rename from testcases/elm-ui/Main.elm
rename to testcases/elm-ui/Suite.elm
index 256ea3b..9f87f1d 100644
--- a/testcases/elm-ui/Main.elm
+++ b/testcases/elm-ui/Suite.elm
@@ -1,24 +1,11 @@
-port module Main exposing (main)
+module Suite exposing (suite)
{-| -}
import Benchmark exposing (..)
-import Benchmark.Runner exposing (BenchmarkProgram, program)
-import Benchmark.Runner.Json
import Element exposing (..)
import Element.Background as Background
import Element.Font as Font
-import Html
-import Html.Attributes as Attr
-import Json.Encode
-
-
-main : Benchmark.Runner.Json.JsonBenchmark
-main =
- Benchmark.Runner.Json.program reportResults suite
-
-
-port reportResults : Json.Encode.Value -> Cmd msg
three =
diff --git a/testcases/elm-ui/V8/Benchmark.elm b/testcases/elm-ui/V8/Benchmark.elm
new file mode 100644
index 0000000..48f0436
--- /dev/null
+++ b/testcases/elm-ui/V8/Benchmark.elm
@@ -0,0 +1,14 @@
+port module V8.Benchmark exposing (main)
+
+{-| -}
+
+
+import Benchmark.Runner.Json
+import Suite
+import Json.Encode
+
+main : Benchmark.Runner.Json.JsonBenchmark
+main =
+ Benchmark.Runner.Json.program reportResults Suite.suite
+
+port reportResults : Json.Encode.Value -> Cmd msg
diff --git a/testcases/elm-ui/V8/Benchmark/Runner/Json.elm b/testcases/elm-ui/V8/Benchmark/Runner/Json.elm
new file mode 100644
index 0000000..48f0436
--- /dev/null
+++ b/testcases/elm-ui/V8/Benchmark/Runner/Json.elm
@@ -0,0 +1,14 @@
+port module V8.Benchmark exposing (main)
+
+{-| -}
+
+
+import Benchmark.Runner.Json
+import Suite
+import Json.Encode
+
+main : Benchmark.Runner.Json.JsonBenchmark
+main =
+ Benchmark.Runner.Json.program reportResults Suite.suite
+
+port reportResults : Json.Encode.Value -> Cmd msg
diff --git a/testcases/elm-ui/V8/Debug.elm b/testcases/elm-ui/V8/Debug.elm
new file mode 100644
index 0000000..f3275b3
--- /dev/null
+++ b/testcases/elm-ui/V8/Debug.elm
@@ -0,0 +1,64 @@
+module V8.Debug exposing (memory, optimizationStatus, reportV8StatusForBenchmarks)
+
+{-| -}
+
+import Json.Encode
+
+
+memory : String -> a -> a
+memory tag value =
+ value
+
+
+type Status
+ = Status Int
+
+
+optimizationStatus : String -> a -> a
+optimizationStatus tag value =
+ value
+
+
+{-|
+
+ hasFastProperties obj
+
+ hasFastSmiElements obj
+
+ hasFastObjectElements obj
+
+ hasFastDoubleElements obj
+
+ hasDictionaryElements obj
+
+ hasFastHoleyElements obj
+
+ haveSameMap ( obj1, obj2 )
+
+ isValidSmi obj
+
+ isSmi obj
+
+ hasFastSmiOrObjectElements obj
+
+ hasSloppyArgumentsElements obj
+
+-}
+type alias Memory =
+ { tag : String
+ , hasFastProperties : Bool
+ , hasFastSmiElements : Bool
+ , hasFastObjectElements : Bool
+ , hasFastDoubleElements : Bool
+ , hasDictionaryElements : Bool
+ , hasFastHoleyElements : Bool
+ , isValidSmi : Bool
+ , isSmi : Bool
+ , hasFastSmiOrObjectElements : Bool
+ , hasSloppyArgumentsElements : Bool
+ }
+
+
+reportV8StatusForBenchmarks : () -> Json.Encode.Value
+reportV8StatusForBenchmarks _ =
+ Json.Encode.null
diff --git a/testcases/elm-ui/standard.html b/testcases/elm-ui/standard.html
deleted file mode 100644
index f076b31..0000000
--- a/testcases/elm-ui/standard.html
+++ /dev/null
@@ -1,22 +0,0 @@
-
-
-
- Main
-
-
-
-
-
-
-
-
diff --git a/testcases/elm-ui/transformed.html b/testcases/elm-ui/transformed.html
deleted file mode 100644
index 5b8d016..0000000
--- a/testcases/elm-ui/transformed.html
+++ /dev/null
@@ -1,21 +0,0 @@
-
-
-
- Main
-
-
-
-
-
-
-
-
diff --git a/testcases/simple/V8/Benchmark.elm b/testcases/simple/V8/Benchmark.elm
new file mode 100644
index 0000000..48f0436
--- /dev/null
+++ b/testcases/simple/V8/Benchmark.elm
@@ -0,0 +1,14 @@
+port module V8.Benchmark exposing (main)
+
+{-| -}
+
+
+import Benchmark.Runner.Json
+import Suite
+import Json.Encode
+
+main : Benchmark.Runner.Json.JsonBenchmark
+main =
+ Benchmark.Runner.Json.program reportResults Suite.suite
+
+port reportResults : Json.Encode.Value -> Cmd msg
diff --git a/testcases/simple/V8/Benchmark/Runner/Json.elm b/testcases/simple/V8/Benchmark/Runner/Json.elm
new file mode 100644
index 0000000..48f0436
--- /dev/null
+++ b/testcases/simple/V8/Benchmark/Runner/Json.elm
@@ -0,0 +1,14 @@
+port module V8.Benchmark exposing (main)
+
+{-| -}
+
+
+import Benchmark.Runner.Json
+import Suite
+import Json.Encode
+
+main : Benchmark.Runner.Json.JsonBenchmark
+main =
+ Benchmark.Runner.Json.program reportResults Suite.suite
+
+port reportResults : Json.Encode.Value -> Cmd msg
diff --git a/testcases/simple/V8/Debug.elm b/testcases/simple/V8/Debug.elm
new file mode 100644
index 0000000..f3275b3
--- /dev/null
+++ b/testcases/simple/V8/Debug.elm
@@ -0,0 +1,64 @@
+module V8.Debug exposing (memory, optimizationStatus, reportV8StatusForBenchmarks)
+
+{-| -}
+
+import Json.Encode
+
+
+memory : String -> a -> a
+memory tag value =
+ value
+
+
+type Status
+ = Status Int
+
+
+optimizationStatus : String -> a -> a
+optimizationStatus tag value =
+ value
+
+
+{-|
+
+ hasFastProperties obj
+
+ hasFastSmiElements obj
+
+ hasFastObjectElements obj
+
+ hasFastDoubleElements obj
+
+ hasDictionaryElements obj
+
+ hasFastHoleyElements obj
+
+ haveSameMap ( obj1, obj2 )
+
+ isValidSmi obj
+
+ isSmi obj
+
+ hasFastSmiOrObjectElements obj
+
+ hasSloppyArgumentsElements obj
+
+-}
+type alias Memory =
+ { tag : String
+ , hasFastProperties : Bool
+ , hasFastSmiElements : Bool
+ , hasFastObjectElements : Bool
+ , hasFastDoubleElements : Bool
+ , hasDictionaryElements : Bool
+ , hasFastHoleyElements : Bool
+ , isValidSmi : Bool
+ , isSmi : Bool
+ , hasFastSmiOrObjectElements : Bool
+ , hasSloppyArgumentsElements : Bool
+ }
+
+
+reportV8StatusForBenchmarks : () -> Json.Encode.Value
+reportV8StatusForBenchmarks _ =
+ Json.Encode.null