fork(1) download 
  1. (defn tails [s]
  2.   (take (count s) (reductions (fn [s _] (rest s)) s s))
  3.  
  4. (defn match[p s]
  5.    (cond
  6.      (empty? p) true
  7.      (empty? s) false
  8.      :else 
  9.       (case (first p)
  10.           \* (some (partial match (rest p)) (tails s))
  11.           \? (recur (rest p) (rest s))
  12.           \\ (and (= (ffirst p) (first s))
  13.                   (recur (drop 2 p) (rest s)))
  14.           (and (= (first p) (first s))
  15.                (recur (rest p) (rest s))))))
  16.  
  17. (print (match  "as*d*?qwe*qwe" "as123dssqwe12345678qwe"))
Runtime error #stdin #stdout #stderr 1.88s 334464KB
comments (?)
stdin 
Standard input is empty
stdout 
Standard output is empty
stderr 
Exception in thread "main" java.lang.RuntimeException: EOF while reading, starting at line 1, compiling:(/home/w1mVjK/prog.clj:17:1)
	at clojure.lang.Compiler.load(Compiler.java:7234)
	at clojure.lang.Compiler.loadFile(Compiler.java:7165)
	at clojure.main$load_script.invoke(main.clj:275)
	at clojure.main$script_opt.invoke(main.clj:337)
	at clojure.main$main.doInvoke(main.clj:421)
	at clojure.lang.RestFn.invoke(RestFn.java:408)
	at clojure.lang.Var.invoke(Var.java:379)
	at clojure.lang.AFn.applyToHelper(AFn.java:154)
	at clojure.lang.Var.applyTo(Var.java:700)
	at clojure.main.main(main.java:37)
Caused by: java.lang.RuntimeException: EOF while reading, starting at line 1
	at clojure.lang.Util.runtimeException(Util.java:221)
	at clojure.lang.LispReader.readDelimitedList(LispReader.java:1206)
	at clojure.lang.LispReader$ListReader.invoke(LispReader.java:1049)
	at clojure.lang.LispReader.read(LispReader.java:263)
	at clojure.lang.LispReader.read(LispReader.java:196)
	at clojure.lang.Compiler.load(Compiler.java:7221)
	... 9 more
https://ideone.com/KB9YBU
language:
Clojure (clojure 1.10.0)
created:
9 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!