elm-pages 3.0.0-beta.2 → 3.0.0-beta.4

package/codegen/elm-pages-codegen.js

@@ -25890,6 +25890,370 @@ var $author$project$Gen$Pages$Internal$NotFoundReason$annotation_ = {
 		$author$project$Elm$Annotation$list(
 			A2($author$project$Elm$Annotation$tuple, $author$project$Elm$Annotation$string, $author$project$Elm$Annotation$string)))
 };
+var $author$project$Gen$Pages$Internal$Platform$moduleName_ = _List_fromArray(
+	['Pages', 'Internal', 'Platform']);
+var $author$project$Elm$Annotation$triple = F3(
+	function (one, two, three) {
+		return $author$project$Internal$Compiler$Annotation(
+			{
+				aliases: A2(
+					$author$project$Internal$Compiler$mergeAliases,
+					A2(
+						$author$project$Internal$Compiler$mergeAliases,
+						$author$project$Elm$Annotation$getAliases(one),
+						$author$project$Elm$Annotation$getAliases(two)),
+					$author$project$Elm$Annotation$getAliases(three)),
+				annotation: $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Tupled(
+					$author$project$Internal$Compiler$nodifyAll(
+						_List_fromArray(
+							[
+								$author$project$Internal$Compiler$getInnerAnnotation(one),
+								$author$project$Internal$Compiler$getInnerAnnotation(two),
+								$author$project$Internal$Compiler$getInnerAnnotation(three)
+							]))),
+				imports: _Utils_ap(
+					$author$project$Internal$Compiler$getAnnotationImports(one),
+					_Utils_ap(
+						$author$project$Internal$Compiler$getAnnotationImports(two),
+						$author$project$Internal$Compiler$getAnnotationImports(three)))
+			});
+	});
+var $author$project$Gen$Pages$Internal$Platform$annotation_ = {
+	effect: F6(
+		function (effectArg0, effectArg1, effectArg2, effectArg3, effectArg4, effectArg5) {
+			return A3(
+				$author$project$Elm$Annotation$namedWith,
+				_List_fromArray(
+					['Pages', 'Internal', 'Platform']),
+				'Effect',
+				_List_fromArray(
+					[effectArg0, effectArg1, effectArg2, effectArg3, effectArg4, effectArg5]));
+		}),
+	flags: A4(
+		$author$project$Elm$Annotation$alias,
+		$author$project$Gen$Pages$Internal$Platform$moduleName_,
+		'Flags',
+		_List_Nil,
+		A3(
+			$author$project$Elm$Annotation$namedWith,
+			_List_fromArray(
+				['Decode']),
+			'Value',
+			_List_Nil)),
+	model: F4(
+		function (modelArg0, modelArg1, modelArg2, modelArg3) {
+			return A4(
+				$author$project$Elm$Annotation$alias,
+				$author$project$Gen$Pages$Internal$Platform$moduleName_,
+				'Model',
+				_List_fromArray(
+					[modelArg0, modelArg1, modelArg2, modelArg3]),
+				$author$project$Elm$Annotation$record(
+					_List_fromArray(
+						[
+							_Utils_Tuple2(
+							'key',
+							A3(
+								$author$project$Elm$Annotation$namedWith,
+								_List_Nil,
+								'Maybe',
+								_List_fromArray(
+									[
+										A3(
+										$author$project$Elm$Annotation$namedWith,
+										_List_fromArray(
+											['Browser', 'Navigation']),
+										'Key',
+										_List_Nil)
+									]))),
+							_Utils_Tuple2(
+							'url',
+							A3($author$project$Elm$Annotation$namedWith, _List_Nil, 'Url', _List_Nil)),
+							_Utils_Tuple2('currentPath', $author$project$Elm$Annotation$string),
+							_Utils_Tuple2('ariaNavigationAnnouncement', $author$project$Elm$Annotation$string),
+							_Utils_Tuple2(
+							'pageData',
+							A3(
+								$author$project$Elm$Annotation$namedWith,
+								_List_Nil,
+								'Result',
+								_List_fromArray(
+									[
+										$author$project$Elm$Annotation$string,
+										$author$project$Elm$Annotation$record(
+										_List_fromArray(
+											[
+												_Utils_Tuple2(
+												'userModel',
+												$author$project$Elm$Annotation$var('userModel')),
+												_Utils_Tuple2(
+												'pageData',
+												$author$project$Elm$Annotation$var('pageData')),
+												_Utils_Tuple2(
+												'sharedData',
+												$author$project$Elm$Annotation$var('sharedData')),
+												_Utils_Tuple2(
+												'actionData',
+												A3(
+													$author$project$Elm$Annotation$namedWith,
+													_List_Nil,
+													'Maybe',
+													_List_fromArray(
+														[
+															$author$project$Elm$Annotation$var('actionData')
+														])))
+											]))
+									]))),
+							_Utils_Tuple2(
+							'notFound',
+							A3(
+								$author$project$Elm$Annotation$namedWith,
+								_List_Nil,
+								'Maybe',
+								_List_fromArray(
+									[
+										$author$project$Elm$Annotation$record(
+										_List_fromArray(
+											[
+												_Utils_Tuple2(
+												'reason',
+												A3($author$project$Elm$Annotation$namedWith, _List_Nil, 'NotFoundReason', _List_Nil)),
+												_Utils_Tuple2(
+												'path',
+												A3($author$project$Elm$Annotation$namedWith, _List_Nil, 'Path', _List_Nil))
+											]))
+									]))),
+							_Utils_Tuple2(
+							'userFlags',
+							A3(
+								$author$project$Elm$Annotation$namedWith,
+								_List_fromArray(
+									['Decode']),
+								'Value',
+								_List_Nil)),
+							_Utils_Tuple2(
+							'transition',
+							A3(
+								$author$project$Elm$Annotation$namedWith,
+								_List_Nil,
+								'Maybe',
+								_List_fromArray(
+									[
+										A2(
+										$author$project$Elm$Annotation$tuple,
+										$author$project$Elm$Annotation$int,
+										A3(
+											$author$project$Elm$Annotation$namedWith,
+											_List_fromArray(
+												['Pages', 'Transition']),
+											'Transition',
+											_List_Nil))
+									]))),
+							_Utils_Tuple2('nextTransitionKey', $author$project$Elm$Annotation$int),
+							_Utils_Tuple2(
+							'inFlightFetchers',
+							A3(
+								$author$project$Elm$Annotation$namedWith,
+								_List_Nil,
+								'Dict',
+								_List_fromArray(
+									[
+										$author$project$Elm$Annotation$string,
+										A2(
+										$author$project$Elm$Annotation$tuple,
+										$author$project$Elm$Annotation$int,
+										A3(
+											$author$project$Elm$Annotation$namedWith,
+											_List_fromArray(
+												['Pages', 'Transition']),
+											'FetcherState',
+											_List_fromArray(
+												[
+													$author$project$Elm$Annotation$var('actionData')
+												])))
+									]))),
+							_Utils_Tuple2(
+							'pageFormState',
+							A3(
+								$author$project$Elm$Annotation$namedWith,
+								_List_fromArray(
+									['Pages', 'FormState']),
+								'PageFormState',
+								_List_Nil)),
+							_Utils_Tuple2('pendingRedirect', $author$project$Elm$Annotation$bool),
+							_Utils_Tuple2(
+							'pendingData',
+							A3(
+								$author$project$Elm$Annotation$namedWith,
+								_List_Nil,
+								'Maybe',
+								_List_fromArray(
+									[
+										A3(
+										$author$project$Elm$Annotation$triple,
+										$author$project$Elm$Annotation$var('pageData'),
+										$author$project$Elm$Annotation$var('sharedData'),
+										A3(
+											$author$project$Elm$Annotation$namedWith,
+											_List_Nil,
+											'Maybe',
+											_List_fromArray(
+												[
+													$author$project$Elm$Annotation$var('actionData')
+												])))
+									])))
+						])));
+		}),
+	msg: F5(
+		function (msgArg0, msgArg1, msgArg2, msgArg3, msgArg4) {
+			return A3(
+				$author$project$Elm$Annotation$namedWith,
+				_List_fromArray(
+					['Pages', 'Internal', 'Platform']),
+				'Msg',
+				_List_fromArray(
+					[msgArg0, msgArg1, msgArg2, msgArg3, msgArg4]));
+		}),
+	program: F6(
+		function (programArg0, programArg1, programArg2, programArg3, programArg4, programArg5) {
+			return A4(
+				$author$project$Elm$Annotation$alias,
+				$author$project$Gen$Pages$Internal$Platform$moduleName_,
+				'Program',
+				_List_fromArray(
+					[programArg0, programArg1, programArg2, programArg3, programArg4, programArg5]),
+				A3(
+					$author$project$Elm$Annotation$namedWith,
+					_List_fromArray(
+						['Platform']),
+					'Program',
+					_List_fromArray(
+						[
+							A3($author$project$Elm$Annotation$namedWith, _List_Nil, 'Flags', _List_Nil),
+							A3(
+							$author$project$Elm$Annotation$namedWith,
+							_List_Nil,
+							'Model',
+							_List_fromArray(
+								[
+									$author$project$Elm$Annotation$var('userModel'),
+									$author$project$Elm$Annotation$var('pageData'),
+									$author$project$Elm$Annotation$var('actionData'),
+									$author$project$Elm$Annotation$var('sharedData')
+								])),
+							A3(
+							$author$project$Elm$Annotation$namedWith,
+							_List_Nil,
+							'Msg',
+							_List_fromArray(
+								[
+									$author$project$Elm$Annotation$var('userMsg'),
+									$author$project$Elm$Annotation$var('pageData'),
+									$author$project$Elm$Annotation$var('actionData'),
+									$author$project$Elm$Annotation$var('sharedData'),
+									$author$project$Elm$Annotation$var('errorPage')
+								]))
+						])));
+		}),
+	requestInfo: A4(
+		$author$project$Elm$Annotation$alias,
+		$author$project$Gen$Pages$Internal$Platform$moduleName_,
+		'RequestInfo',
+		_List_Nil,
+		$author$project$Elm$Annotation$record(
+			_List_fromArray(
+				[
+					_Utils_Tuple2('contentType', $author$project$Elm$Annotation$string),
+					_Utils_Tuple2('body', $author$project$Elm$Annotation$string)
+				])))
+};
+var $author$project$Gen$Pages$Internal$Platform$Cli$moduleName_ = _List_fromArray(
+	['Pages', 'Internal', 'Platform', 'Cli']);
+var $author$project$Gen$Pages$Internal$Platform$Cli$annotation_ = {
+	flags: A4(
+		$author$project$Elm$Annotation$alias,
+		$author$project$Gen$Pages$Internal$Platform$Cli$moduleName_,
+		'Flags',
+		_List_Nil,
+		A3(
+			$author$project$Elm$Annotation$namedWith,
+			_List_fromArray(
+				['Decode']),
+			'Value',
+			_List_Nil)),
+	model: function (modelArg0) {
+		return A4(
+			$author$project$Elm$Annotation$alias,
+			$author$project$Gen$Pages$Internal$Platform$Cli$moduleName_,
+			'Model',
+			_List_fromArray(
+				[modelArg0]),
+			$author$project$Elm$Annotation$record(
+				_List_fromArray(
+					[
+						_Utils_Tuple2(
+						'staticResponses',
+						A3($author$project$Elm$Annotation$namedWith, _List_Nil, 'StaticResponses', _List_Nil)),
+						_Utils_Tuple2(
+						'errors',
+						$author$project$Elm$Annotation$list(
+							A3($author$project$Elm$Annotation$namedWith, _List_Nil, 'BuildError', _List_Nil))),
+						_Utils_Tuple2(
+						'allRawResponses',
+						A3($author$project$Elm$Annotation$namedWith, _List_Nil, 'RequestsAndPending', _List_Nil)),
+						_Utils_Tuple2(
+						'unprocessedPages',
+						$author$project$Elm$Annotation$list(
+							A2(
+								$author$project$Elm$Annotation$tuple,
+								A3($author$project$Elm$Annotation$namedWith, _List_Nil, 'Path', _List_Nil),
+								$author$project$Elm$Annotation$var('route')))),
+						_Utils_Tuple2(
+						'maybeRequestJson',
+						A3(
+							$author$project$Elm$Annotation$namedWith,
+							_List_Nil,
+							'RenderRequest',
+							_List_fromArray(
+								[
+									$author$project$Elm$Annotation$var('route')
+								]))),
+						_Utils_Tuple2('isDevServer', $author$project$Elm$Annotation$bool)
+					])));
+	},
+	msg: A3(
+		$author$project$Elm$Annotation$namedWith,
+		_List_fromArray(
+			['Pages', 'Internal', 'Platform', 'Cli']),
+		'Msg',
+		_List_Nil),
+	program: function (programArg0) {
+		return A4(
+			$author$project$Elm$Annotation$alias,
+			$author$project$Gen$Pages$Internal$Platform$Cli$moduleName_,
+			'Program',
+			_List_fromArray(
+				[programArg0]),
+			A3(
+				$author$project$Elm$Annotation$namedWith,
+				_List_fromArray(
+					['Platform']),
+				'Program',
+				_List_fromArray(
+					[
+						A3($author$project$Elm$Annotation$namedWith, _List_Nil, 'Flags', _List_Nil),
+						A3(
+						$author$project$Elm$Annotation$namedWith,
+						_List_Nil,
+						'Model',
+						_List_fromArray(
+							[
+								$author$project$Elm$Annotation$var('route')
+							])),
+						A3($author$project$Elm$Annotation$namedWith, _List_Nil, 'Msg', _List_Nil)
+					])));
+	}
+};
 var $author$project$Gen$Pages$Msg$annotation_ = {
 	msg: function (msgArg0) {
 		return A3(
@@ -32318,32 +32682,6 @@ var $author$project$Internal$Compiler$noImports = function (tipe) {
 	return $author$project$Internal$Compiler$Annotation(
 		{aliases: $author$project$Internal$Compiler$emptyAliases, annotation: tipe, imports: _List_Nil});
 };
-var $author$project$Elm$Annotation$triple = F3(
-	function (one, two, three) {
-		return $author$project$Internal$Compiler$Annotation(
-			{
-				aliases: A2(
-					$author$project$Internal$Compiler$mergeAliases,
-					A2(
-						$author$project$Internal$Compiler$mergeAliases,
-						$author$project$Elm$Annotation$getAliases(one),
-						$author$project$Elm$Annotation$getAliases(two)),
-					$author$project$Elm$Annotation$getAliases(three)),
-				annotation: $stil4m$elm_syntax$Elm$Syntax$TypeAnnotation$Tupled(
-					$author$project$Internal$Compiler$nodifyAll(
-						_List_fromArray(
-							[
-								$author$project$Internal$Compiler$getInnerAnnotation(one),
-								$author$project$Internal$Compiler$getInnerAnnotation(two),
-								$author$project$Internal$Compiler$getInnerAnnotation(three)
-							]))),
-				imports: _Utils_ap(
-					$author$project$Internal$Compiler$getAnnotationImports(one),
-					_Utils_ap(
-						$author$project$Internal$Compiler$getAnnotationImports(two),
-						$author$project$Internal$Compiler$getAnnotationImports(three)))
-			});
-	});
 var $author$project$Elm$triple = F3(
 	function (oneExp, twoExp, threeExp) {
 		return $author$project$Internal$Compiler$Expression(
@@ -38301,13 +38639,58 @@ var $author$project$GenerateMain$otherFile = F2(
 							A2(
 								$author$project$Elm$declaration,
 								'main',
-								$author$project$Gen$Pages$Internal$Platform$application(config)));
+								A2(
+									$author$project$Elm$withType,
+									A3(
+										$author$project$Elm$Annotation$namedWith,
+										_List_fromArray(
+											['Platform']),
+										'Program',
+										_List_fromArray(
+											[
+												$author$project$Gen$Pages$Internal$Platform$annotation_.flags,
+												A4(
+												$author$project$Gen$Pages$Internal$Platform$annotation_.model,
+												A2($author$project$Elm$Annotation$named, _List_Nil, 'Model'),
+												A2($author$project$Elm$Annotation$named, _List_Nil, 'PageData'),
+												A2($author$project$Elm$Annotation$named, _List_Nil, 'ActionData'),
+												A2(
+													$author$project$Elm$Annotation$named,
+													_List_fromArray(
+														['Shared']),
+													'Data')),
+												A5(
+												$author$project$Gen$Pages$Internal$Platform$annotation_.msg,
+												A2($author$project$Elm$Annotation$named, _List_Nil, 'Msg'),
+												A2($author$project$Elm$Annotation$named, _List_Nil, 'PageData'),
+												A2($author$project$Elm$Annotation$named, _List_Nil, 'ActionData'),
+												A2(
+													$author$project$Elm$Annotation$named,
+													_List_fromArray(
+														['Shared']),
+													'Data'),
+												A2(
+													$author$project$Elm$Annotation$named,
+													_List_fromArray(
+														['ErrorPage']),
+													'ErrorPage'))
+											])),
+									$author$project$Gen$Pages$Internal$Platform$application(config))));
 					} else {
 						return $author$project$Elm$Extra$expose(
 							A2(
 								$author$project$Elm$declaration,
 								'main',
-								$author$project$Gen$Pages$Internal$Platform$Cli$cliApplication(config)));
+								A2(
+									$author$project$Elm$withType,
+									$author$project$Gen$Pages$Internal$Platform$Cli$annotation_.program(
+										$author$project$Elm$Annotation$maybe(
+											A2(
+												$author$project$Elm$Annotation$named,
+												_List_fromArray(
+													['Route']),
+												'Route'))),
+									$author$project$Gen$Pages$Internal$Platform$Cli$cliApplication(config))));
 					}
 				}(),
 					dataForRoute.declaration,