Method invoke

src/jvm/clojure/lang/LispReader.java:626–634

(Object reader, Object semicolon, Object opts, Object pendingForms)

public static class CommentReader extends AFn{
	public Object invoke(Object reader, Object semicolon, Object opts, Object pendingForms) {
		Reader r = (Reader) reader;
		int ch;
		do
			{
			ch = read1(r);
			} while(ch != -1 && ch != '\n' && ch != '\r');
		return r;
	}

}