Skip to content

Instantly share code, notes, and snippets.

java.lang.ArrayIndexOutOfBoundsException: 42
at scala.tools.nsc.ast.TreeGen.scalaFunctionConstr(TreeGen.scala:36)
at scala.tools.nsc.typechecker.Unapplies$class.createFun$1(Unapplies.scala:138)
at scala.tools.nsc.typechecker.Unapplies$class.parents$1(Unapplies.scala:139)
at scala.tools.nsc.typechecker.Unapplies$class.caseModuleDef(Unapplies.scala:141)
at scala.tools.nsc.Global$analyzer$.caseModuleDef(Global.scala:291)
at scala.tools.nsc.typechecker.Namers$Namer$$anonfun$5.apply(Namers.scala:354)
at scala.tools.nsc.typechecker.Namers$Namer$$anonfun$5.apply(Namers.scala:354)
at scala.tools.nsc.typechecker.Namers$Namer.ensureCompanionObject(Namers.scala:296)
at scala.tools.nsc.typechecker.Namers$Namer.enterSym(Namers.scala:354)
(defn listify [orig-list]
"Turns (1 2 3 ...) into (1 (2 (3 (...)))) using continuation passing style."
(loop [lst orig-list cont identity]
(if (= () lst)
(cont ())
(recur (rest lst)
(fn [insert]
(cont (cons (first lst)
(list insert))))))))
(* Basic OCaml Tokyo Tyrant Client.
* Currently, only supports get and put, but may eventually add all
* the exciting other features.
*
* -Cooper Francis.
*)
#use "topfind";;
#camlp4o;;
#require "lwt";;
#require "unix";;
import scala.xml._
import java.net.{URLConnection, URL}
class RSSRead {
def getFeed(feedUrl: String) = {
val url = new URL(feedUrl)
val connect = url.openConnection
val feed = XML.load(connect.getInputStream)
feed \\ "channel" \\ "item"