afl-material: progs/app3.scala@665087dcf7d2 (annotated)

7 73cf4406b773 updated Christian Urban <urbanc@in.tum.de> parents: diff changeset	1	val my_urls = """urbanc""".r
73cf4406b773 updated Christian Urban <urbanc@in.tum.de> parents: diff changeset	2
73cf4406b773 updated Christian Urban <urbanc@in.tum.de> parents: diff changeset	3	def crawl(url: String, n: Int) : Unit = {
73cf4406b773 updated Christian Urban <urbanc@in.tum.de> parents: diff changeset	4	if (n == 0) ()
73cf4406b773 updated Christian Urban <urbanc@in.tum.de> parents: diff changeset	5	else if (my_urls.findFirstIn(url) == None) ()
73cf4406b773 updated Christian Urban <urbanc@in.tum.de> parents: diff changeset	6	else {
96 9fcd3de53c06 updated Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 93 diff changeset	7	println(s"Visiting: $n $url")
97 60a3ba90dd53 added Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 96 diff changeset	8	for (u <- get_all_URLs(get_page(url)))
60a3ba90dd53 added Christian Urban <christian dot urban at kcl dot ac dot uk> parents: 96 diff changeset	9	crawl(u, n - 1)
7 73cf4406b773 updated Christian Urban <urbanc@in.tum.de> parents: diff changeset	10	}
73cf4406b773 updated Christian Urban <urbanc@in.tum.de> parents: diff changeset	11	}

author	Christian Urban <christian dot urban at kcl dot ac dot uk>
	Sat, 12 Oct 2013 10:13:52 +0100 (2013-10-12)
changeset 141	665087dcf7d2
parent 97	60a3ba90dd53
child 254	dcd4688690ce
permissions	-rw-r--r--