Testing DSL/QL concept

testing_dsl_ql_concept.txt

		seed().
			upgrade().
			createWebsites(createWebsitesP{blocked: true}).
			goFreemium().
			freemiumTask(freemiumTaskP{mockTime: true}).
			checkBlockedWebsites(checkBlockedWebsitesP{expect: []})

		stateMachine := []interface{
			{Name: "upgrade", Src: []string{"trial"}, Dst: "has_plan"},
			{Name: "goFreemium", Src: []string{"has_plan"}, Dst: "has_freemium", MiddleState: "upgrade"},
			{Name: "goFreemium", Src: []string{"has_plan"}, Dst: "has_future_freemium", MiddleState: "downgrade"}
		}

		`function Abc($mockTime) -> seed->upgrade->createWebsites(blocked=true)->goFreemium->freemiumTask(mockTime=$mockTime)->checkBlockedWebsites(expect=$expect)`

		testQuery := `Abc(true)`
		testQuery2 := `Abc(false)`

		t := tests.New()
		t.StateMachine(stateMachine)

		t.Do(testQuery)