17 .hljs-flow,

18 .lisp .hljs-title,

19 .clojure .hljs-built_in,

20 .nginx .hljs-title,

21 .tex .hljs-special {

20 pre .method,

21 pre .list .title,

22 pre .clojure .built_in,

23 pre .nginx .title,

24 pre .tag .title,

65 pre .number,

66 pre .css .function,

67 pre .clojure .attribute {

68 color: #066;

69 }

83 pre .params,

84 pre .variable,

85 pre .clojure .title {

86 color: #606;

87 }

1 (ns work.core-test

2 (:use clojure.test

3 [plumbing.core :only [retry wait-until]]

4 [plumbing.serialize :only [send-clj clj-worker

1 # Validateur, a Clojure(Script) Validation Library

2

3 Validateur is a [Clojure(Script) validation library](http://clojurevalidations.info) inspired by Ruby's ActiveModel. Validateur is functional: validators are

4 functions, validation sets are higher-order functions, validation results are returned as values.

5

7 ## Supported Clojure versions

8

9 Validateur requires Clojure 1.7+/ClojureScript 0.0-2138+.

10

11

54

55 Validateur uses [Leiningen 2](https://github.com/technomancy/leiningen/blob/master/doc/TUTORIAL.md). Make

56 sure you have it installed and then run tests against all supported Clojure versions and a recent release of ClojureScript using

57

58 lein all do clean, test

2 (:use [trammel.core :only (contract)])

3 (:use trammel.factors)

4 (:use [clojure.test :only (deftest is are)]))

5

6 (deftest in-test

1 (ns colorize.core

2 "A set of functions to wrap strings in ansi-colors."

3 (:use [clojure.pprint :only [pprint]]))

4

5 (def ansi-colors {:reset "[0m"

1

2 (ns jinrou-clojure.test.model.test-db

3 (:refer-clojure)

4 (:use clojure.test

5 [jinrou-clojure.model.db :reload true]))

18 along with Thinklab. If not, see <http://www.gnu.org/licenses/>.

19 */

20 package org.integratedmodelling.clojure.utils;

21

22 import java.util.Collection;

27

28 /**

29 * Pass a collection (e.g. a clojure list of :kw value pairs) and retrieve pairs of key/value with the key

30 * converted to a string and the leading colon removed. Also performs minimal error checking and is null-tolerant.

31 *

52 Object val = _it.next();

53 if (!key.startsWith(":"))

54 throw new ThinklabRuntimeException("keyword list improperly formatted: key is not a clojure keyword");

55 key = key.substring(1);

56 return new Pair<String, Object>(key, val);

1 (ns clojure-koans.strings

2 (:require [clojure.string :as string]))

11 /* rich Mar 5, 2009 */

12

13 package clojure.lang;

14

15 final public class Stream implements Seqable, Streamable, Sequential {

2

3

4 ;;; Clojure has better alternatives for dynamic dispatch, [protocols](http://clojure.org/protocols)

5

6

11 [lamina core trace]

12 [lamina.trace.core :only (probe-channels probe-switches)]

13 [clojure test]))

14

15 (defn clear-probe-channels []

12 (:use [seesaw core tree]))

13

14 (def source "http://www.4clojure.com/problems/rss")

15

16 ; Make a tree model for some XML using same arguments (branch? and childnre)

17 ; as (clojure.core/tree-seq)

18 (defn load-model []

19 (simple-tree-model

20 (complement string?)

21 (comp seq :content)

22 (clojure.xml/parse source)))

23

24 ; A custom renderer so that XML elements are displayed nicely

9 ;; test-util.clj

10 ;;

11 ;; A Clojure implementation of Datalog -- Utilities Tests

12 ;;

13 ;; straszheimjeffrey (gmail)

14 ;; Created 11 Feburary 2009

15

16 (ns clojure.contrib.datalog.tests.test-util

17 (:use clojure.test

18 clojure.contrib.datalog.util)

19 (:use [clojure.contrib.except :only (throwf)]))

24 #^{:author "Stuart Sierra",

25 :doc "Singleton functions"}

26 clojure.contrib.singleton)

27

28 (defn global-singleton

1 (ns clj-drmaa.core

2 (use [clojure.contrib

3 [def :only [defn-memo defnk]]])

4 (import [org.ggf.drmaa DrmaaException Session SessionFactory JobTemplate]))

1 (ns twilio.test.twiml.voice

2 (:use [twilio.twiml.voice] :reload)

3 (:use [clojure.test]

4 [twilio.twiml.core]))

5

1 (ns minijava.test-x86

2 (:use clojure.test

3 minijava.access

4 minijava.obj

1 # euler-clojure

2

3 My solutions to the [Project Euler][1] problems written in the

4 [Clojure][2] programming language. I am doing this for fun and

5 profit. But mostly fun. It is a great way to learn a new programming

6 language and excercise some math muscles (although some of the math

8

9 Given that, these are just my solutions to the problems. There may be

10 cleaner, or more idiomattic ways to do this in Clojure (if so, please

11 drop me a line and let me know). I am learning as I go, so some of

12 the early solutions might be a little off.

21 ## Usage

22

23 Currently this project requires Clojure 1.2. I will update it to 1.3

24 sometime soon. I use `lein swank` to get a REPL up and running with the

25 right environment setup. To run the solutions:

15 ;; limitations under the License.

16 (ns backtype.storm.tuple-test

17 (:use [clojure test])

18 (:import [backtype.storm.tuple Tuple])

19 (:use [backtype.storm testing]))

7 <li class="first odd">welcome.html</li>

8 <li class="even">form.html</li>

9 <li class="last odd">clojure.html</li>

10 </ol>

11

28 </tr>

29 <tr>

30 <td>clojure.html (row 3, cell 1)</td>

31 <td>Test window handling (row 3, cell 2)</td>

32 </tbody>

33 </table>

34

35 <p>By the way, Clojure <a href="/clojure" target="_blank">is amazing!</a> for the following reasons:</p>

36

37 <ul id="clojure-reasons">

24 ^{:author "Stuart Sierra",

25 :doc "Singleton functions"}

26 clojure.contrib.singleton)

27

28 (defn global-singleton

17 (ns plugboard.demos.forms.test-responses

18 (:use

19 clojure.test

20 compojure.core

21 plugboard.demos.jetty-fixture

22 clojure.data.zip.xml

23 plugboard.util)

24 (:require

25 [clj-http.client :as http]

26 [ring.util.codec :as codec]

27 [clojure.string :as string]

28 plugboard.demos.forms.configuration))

29

1 (use '[clojure.string :only (split-lines)])

2

3 (defn readBoard

1 (ns monome-serial.event-handlers

2 (:use [clojure.core.incubator :only [dissoc-in]]))

3

4 (defn on-action

7 ;;

8 ;; Defines the Fn record type for representing 'fn' expressions in the

9 ;; Clojure TCO compiler.

10 ;;

11 ;; It implements the following protocols:

1 (ns vision.craig

2 (:import java.net.URL)

3 (:require [clojure.contrib.string :as str-utils :only (substring? lower-case)])

4 (:use hiccup.core

5 vision.views

1 (ns metabase.sync.sync-metadata.tables-test

2 "Test for the logic that syncs Table models with the metadata fetched from a DB."

3 (:require [clojure.test :refer :all]

4 [metabase

5 [models :refer [Database Table]]

1 (ns capra.account

2 "Access and manage accounts on a Capra server."

3 (:refer-clojure :exclude [get list])

4 (:use capra.base64)

5 (:use capra.http-client)

33 ## Building

34

35 MarkRight is written in clojurescript. To build, make sure you have clojure and leiningen installed on your system.

36

37 ### Requirements

13

14 (ns integration.collada-scene-test

15 (:require [clojure.test :refer :all]

16 [dynamo.graph :as g]

17 [integration.test-util :as test-util]

12

13 (ns lein-plugins.tar-install

14 (:require [clojure.java.io :as io]

15 [clojure.string :as string])

1 (defproject com.cemerick/url "0.1.2-SNAPSHOT"

2 :description "Makes working with URLs in Clojure a little more pleasant."

3 :url "http://github.com/cemerick/url"

4 :license {:name "Eclipse Public License"

5 :url "http://www.eclipse.org/legal/epl-v10.html"}

6 :dependencies [[org.clojure/clojure "1.5.1"]

7 [pathetic "0.5.0"]

8 [org.clojure/clojurescript "0.0-1835" :optional true]]

12 :aliases {"cleantest" ["do" "clean," "cljx" "once," "test,"

13 "cljsbuild" "once," "cljsbuild" "test"]}

14 :profiles {:dev {:dependencies [[com.cemerick/clojurescript.test "0.0.4"]

15 [com.keminglabs/cljx "0.3.0"]

16 [com.cemerick/piggieback "0.0.5"]]

5 <link rel="icon" href="static/favicon.png">

6 <link rel="shortcut icon" href="static/favicon.png">

7 <link rel="stylesheet" href="static/clojure.css" type="text/css" media="all" />

8 <link rel="stylesheet" href="static/wiki.css" type="text/css" media="all" />

9 <link rel="stylesheet" href="static/internal.css" type="text/css" media="all" />

11 </head>

12 <!--

13 This document was auto-generated from the source by the clojure autodoc system.

14 To report errors or ask questions about the overall documentation structure, formatting,

15 etc., contact Tom Faulhaber (google mail name: tomfaulhaber).

20 <div id="AllContentContainer">

21 <div id="Header">

22 <a href="index.html" id="Logo"><img src="static/clojure-icon.gif" width="100" height="100" alt="Clojure" /></a>

23 <h1><a href="index.html" id="page-header"

24 title="page header title">Page header</a></h1>

1 (ns re-frame.loggers

2 (:require

3 [clojure.set :refer [difference]]

4 #?@(:clj [[clojure.string :as str]

5 [clojure.tools.logging :as log]])))

6

7 #?(:clj (defn log [level & args]

27 (js/console.groupEnd.bind js/console)

28 #())})

29 ;; clojure versions

30 #?(:clj {:log (partial log :info)

31 :warn (partial log :warn)

1 ;;; pprint.clj -- Pretty printer and Common Lisp compatible format function (cl-format) for Clojure

2

3 ; Copyright (c) Rich Hickey. All rights reserved.

14 (ns

15 ^{:author "Tom Faulhaber",

16 :doc "A Pretty Printer for Clojure

17

18 clojure.pprint implements a flexible system for printing structured data

22

23 Out of the box, pprint supports a simple structured format for basic data

24 and a specialized format for Clojure source code. More advanced formats,

25 including formats that don't look like Clojure data at all like XML and

30 Common Lisp. Because pretty printing directives are directly integrated with

31 cl-format, it supports very concise custom dispatch. It also provides

32 a more powerful alternative to Clojure's standard format function.

33

34 See documentation for pprint and cl-format for more information or

44 ------------

45

46 .. code-block:: clojure

47

48 (def infra-es-rules

1 (ns user

2 (:require [clojure.spec.test.alpha :as stest])

3 (:import [clojure.lang PersistentQueue]

33 :array-list (doto (ArrayList.) (.add 1) (.add 2) (.add 3))

34 :linked-list (doto (LinkedList.) (.add '/) (.add 1) (.add :a))}

35 :clojure {:set #{:a :b :c}

36 :map {:foo "bar"}

37 :list '(+ 1 2 3)

4 (:import [loom.graph BasicEditableGraph]))

5

6 ;; This example adds formatting and navigation support for loom: a clojure

7 ;; library for building graph data structures.

8 ;; see https://github.com/aysylu/loom

1 ;;; test-helper.el --- Clojure Mode: Non-interactive unit-test setup -*- lexical-binding: t; -*-

2

3 ;; Copyright (C) 2014-2020 Bozhidar Batsov <bozhidar@batsov.com>

31 (load-prefer-newer t))

32 ;; Load the file under test

33 (load (expand-file-name "clojure-mode" source-directory)))

34

35 (defmacro with-clojure-buffer (text &rest body)

36 "Create a temporary buffer, insert TEXT, switch to clojure-mode and evaluate BODY."

37 (declare (indent 1))

38 `(with-temp-buffer

39 (erase-buffer)

40 (insert ,text)

41 (clojure-mode)

42 ,@body))

43

8

9 (ns cljs.analyzer.macros

10 (:refer-clojure :exclude [binding]))

11

12 (defmacro with-warning-handlers [handlers & body]

42 (def-widget-creational-coercion javax.swing.Action [v] (JButton. v))

43

44 (def-widget-creational-coercion clojure.lang.Keyword

45 [v]

46 (condp = v

49 :fill-v (Box/createVerticalGlue)))

50

51 (def-widget-creational-coercion clojure.lang.IPersistentVector

52 [[v0 v1 v2]]

53 (cond

18 using System.Text;

19

20 namespace clojure.lang

21 {

22 /// <summary>

1 #+title: Path Finding Using A-Star in Clojure

2 #+tags: clojure path-finding

3

4 For a recent project, I had to implement A* (A-Star) in Clojure, since

5 it's a very popular path finding algorithm used in gaming I thought it

6 might be interesting to other clojurians too.

44 between nodes.

45

46 #+begin_src clojure

47 (def maze1 [[0 0 0 0 0 0 0]

48 [0 0 0 1 0 0 0]

55 walkable nodes and 1 denoting non walkable nodes.

56

57 #+begin_src clojure

58 (defn manhattan-distance [[x1 y1] [x2 y2]]

59 (+ (Math/abs ^Integer (- x2 x1)) (Math/abs ^Integer (- y2 y1))))

25 (ns ^{:doc "Macros that expand to repeated copies of a template expression."

26 :author "Stuart Sierra"}

27 clojure.template

28 (:require [clojure.walk :as walk]))

1 (ns claro.projection.sort

2 (:refer-clojure :exclude [sort-by])

3 (:require [claro.projection

4 [protocols :as p]

16 (fn [sort-keys]

17 (->> (map vector sort-keys sq)

18 (clojure.core/sort-by first)

19 (mapv second)))

20 [sort-template]

38 the resulting sorted sequence.

39

40 ```clojure

41 (-> [{:index 3, :value 'third}

42 {:index 1, :value 'first}

1 (ns lein-monolith.task.util-test

2 (:require

3 [clojure.test :refer [deftest testing is]]

4 [lein-monolith.task.util :as u]))

5

1 (ns reitit.pedestal-test

2 (:require [clojure.test :refer [deftest testing is]]

3 [io.pedestal.test]

4 [io.pedestal.http]

48 `:css-dirs` config to the metadata in the build file like so:

49

50 ```clojure

51 ^{:css-dirs ["resources/public/css"]}

52 {:main example.core}

55 Or you can set it for all builds and compiles in the `figwheel-main.edn`:

56

57 ```clojure

58 {:css-dirs ["resources/public/css"]

59 ;; rest of the config

64

65 ```shell

66 clojure -m figwheel.main -b dev -r

67 ```

68

22 "./codemirror/mode/xml/xml.js",

23 "./codemirror/mode/css/css.js",

24 "./codemirror/mode/clojure/clojure.js",

25 "./codemirror/mode/haxe/haxe.js",

26 "./codemirror/mode/htmlmixed/htmlmixed.js",

1

2 (ns app.comp.bookmark

3 (:require [clojure.string :as string]

4 [hsl.core :refer [hsl]]

5 [respo-ui.core :as ui]

1 (ns workshop.challenge-3-4

2 (:require [workshop.workshop-utils :as u]

3 [clojure.string :as s]))

4

5 ;;; Workflows ;;;

1 (ns babashka.datafy-test

2 (:require [babashka.test-utils :as tu]

3 [clojure.edn :as edn]

4 [clojure.test :as t :refer [deftest is testing]]))

9 (deftest datafy-test

10 (testing "default implementation of datafy works"

11 (is (= #{:public} (bb "(require '[clojure.datafy :as d]) (:flags (d/datafy Exception))"))))

12 (testing "custom implementation of datafy works"

13 (is (= {:number 1} (bb "

14 (require '[clojure.datafy :as d]

15 '[clojure.core.protocols :as p])

24 (testing "implement datafy via metadata"

25 (is (= {:datafied []} (bb "

26 (require '[clojure.datafy :as d]

27 '[clojure.core.protocols :as p])

1 (ns clojure.realworld.comment.core

2 (:require [clj-time.core :as t]

3 [clojure.realworld.article.interface :as article]

4 [clojure.realworld.comment.store :as store]

5 [clojure.realworld.profile.interface :as profile]))

3 # Geometer

4

5 In my continuing effort to get the [Clojure](http://clojure.org)

6 community to notice [Karsten Schmidt](http://postspectacular.com), and

7 the creative coding community to notice Clojure, I've created this

3 While it's strongly suggested that Lambda functions are minimal abstractions of

4 the execution environment (i.e. input/output processing only, delegating to

5 generic Clojurescript functions), there are times when it's going to make sense

6 to test the entry points off of EC2.

7

18 ### Example

19

20 ```clojure

21 (deflambda testable [x ctx]

22 (go

30 ### Example

31

32 ```clojure

33 (def fs (.promisifyAll promesa/Promise (nodejs/require "fs")))

34

1 (ns pelrapeire.views.projects.uid.home-view-test

2 (:use pelrapeire.views.projects.uid.home-view

3 clojure.contrib.trace

4 clojure.test))

1 (ns pelrapeire.repository.mail.mail-test

2 (:use clojure.test

3 clojure.contrib.trace

1 (ns cmr.access-control.test.services.acl-util

2 (:require

3 [clojure.test :refer :all]

4 [cmr.access-control.services.acl-util :as acl-util]

5 [cmr.access-control.test.util :as u]

4 [![Clojars Project][clojars-badge]][clojars]

5 [![Tag][tag-badge]][tag]

6 [![Clojure version][clojure-v]](project.clj)

7

8 [![][logo]][logo-large]

57 [tag-badge]: https://img.shields.io/github/tag/cmr-exchange/dev-env-manager.svg

58 [tag]: https://github.com/cmr-exchange/dev-env-manager/tags

59 [clojure-v]: https://img.shields.io/badge/clojure-1.8.0-blue.svg

60 [jdk-v]: https://img.shields.io/badge/jdk-1.7+-blue.svg

61 [clojars]: https://clojars.org/gov.nasa.earthdata/cmr-dev-env-manager

1 (ns map-reduce.plugin.rtiming

2 (:require [clojure.java.io :as io]

3 [clojure.java.shell :as shell]

4 [clojure.string :as string]

5 [map-reduce.plugin :as plugin])

6 (:import java.lang.management.ManagementFactory))

1 (ns clojure.test-clojure (:require clojure.test))

2

3 (def test-namespaces '[

4 clojure.test-clojure.agents

5 ;;;clojure.test-clojure.annotations

6 clojure.test-clojure.atoms

7 clojure.test-clojure.clojure-set

8 clojure.test-clojure.clojure-walk

9 ;;;clojure.test-clojure.clojure-xml

10 clojure.test-clojure.clojure-zip

11 clojure.test-clojure.compilation

12 clojure.test-clojure.control

10 "Functions for encoding data."

11 (:use skyway.str-utils)

12 (:use clojure.contrib.duck-streams)

13 (:import java.net.URLEncoder)

14 (:import java.net.URLDecoder)

47

48 (defn marshal

49 "Serialize a Clojure object in a base64-encoded string."

50 [data]

51 (base64-encode (pr-str data)))

52

53 (defn unmarshal

54 "Unserialize a Clojure object from a base64-encoded string."

55 [marshaled]

56 (read-string (base64-decode marshaled)))

2 (:require

3 [contrib.orderedmap :refer [ordered-map]]

4 [clojure.test :refer [deftest is testing]]))

5

6 (deftest orderedmap|construct

5 * [Custom Errors](#user-content-custom-errors)

6

7 Coast attempts to make clojure exceptions a little nicer by offering two functions: `raise` and `rescue`

8

9 In this guide, we learn how clojure exceptions are raised, how to write logic around them and finally creating your own custom exceptions.

12 Exceptions are great since they halt the program at a certain stage and make sure everything is correct before proceeding.

13

14 Exceptions, especially in clojure, are usually just treated as insane, indecipherable walls of text that tell devs that *something* went wrong, go dive in and find it.

15

16 By default, Coast handles all exceptions for you and displays them in a nice format during development. However, you are free to handle exceptions however you want.

22 Here's how `raise` works with one argument

23

24 ```clojure

25 (raise {:message "This is an error with a message key"})

26 ```

14

15 ;; This file simple attempts to "require" every library in

16 ;; clojure-contrib. The names of all contrib libs (minus the

17 ;; "clojure.contrib" part) are in *all-contrib-libs*. Libraries which

18 ;; throw errors when loading under the latest trunk SVN revisions of

19 ;; Clojure and clojure-contrib are commented out.

20 ;;

21 ;; This is only intended to check that the libraries will load without

23 ;; defined using test-is, you can run them with:

24 ;;

25 ;; (clojure.test/run-all-tests)

26 ;;

27 ;; If you write a new lib, please add it to the list in this file.

28

29

30 (ns clojure.contrib.load-all)

31

32 (def *all-contrib-libs* '[

1 (ns chlorine.configs

2 (:require [chlorine.state :refer [configs state]]

3 [clojure.walk :as walk]

4 [chlorine.utils :as aux]

5 ; [check.core :refer-macros [check]]

6 [clojure.test]))

7

8 (defn- propagate-to-config [new-value]

10 [midje.internal-ideas.expect :only [up-to-full-expect-form

11 tack-on__then__at-rightmost-expect-leaf]])

12 (:require [clojure.zip :as zip]))

13

14 (defn is-head-of-form-providing-prerequisites? [loc]

1 (ns restql.hooks.core-test

2 (:require [clojure.test :refer :all]

3 [restql.hooks.core :as hooks]))

4

5 require '@mizchi/codemirror/mode/coffeescript/coffeescript.js'

6 require '@mizchi/codemirror/mode/css/css.js'

7 require '@mizchi/codemirror/mode/clojure/clojure.js'

8 require '@mizchi/codemirror/mode/cobol/cobol'

9 require '@mizchi/codemirror/mode/commonlisp/commonlisp'

58 clojure_version=1.10.1.478

59 wget "https://download.clojure.org/install/linux-install-${clojure_version}.sh"

60 chmod +x "linux-install-${clojure_version}.sh"

61 "./linux-install-${clojure_version}.sh"

62

63 # The version in the Disco repos is out of date (1.0 series) and does

1 (ns cascading.clojure.parse-test

2 (:use clojure.test

3 (cascading.clojure parse testing))

4 (:import cascading.tuple.Fields))

5

14

15 (deftest test-parse-fn-spec-simple

16 (is (= ["cascading.clojure.parse-test" "example"]

17 (parse-fn-spec #'example))))

18

19 (deftest test-parse-fn-spec-hof

20 (is (= ["cascading.clojure.parse-test" "example" 3]

21 (parse-fn-spec [#'example 3]))))

22

1 (ns steganography

2 (:use clojure.contrib.seq-utils)

3 (:import (javax.imageio ImageIO)

4 (java.io File)))

9 https://gist.github.com/TaylorMonacelli/5c89180c31aad73f7fb76af66ccabe5a

10

11 https://github.com/rebcabin/ClojureProjects/blob/master/ws-intro/traffic.json

12

13 https://github.com/benbernard/HomeDir/blob/master/bin/process-scrollback-for-urlview

23 ```

24

25 Navigate to a clojurescript file and start a figwheel REPL with `cider-jack-in-clojurescript` or (`C-c M-J`)

26

27 {{/cider?}}

1 # Clojurescript TodoMVC Examples by Library

2

3 - [**Bract** + ClojureScript](https://github.com/bract/demo.todomvc)

4 - [clojurescript](https://github.com/dfuenzalida/todo-cljs)

5 - [**Hoplon**](https://github.com/hoplon/demos/tree/master/todoFRP)

6 - [**Om**](https://github.com/swannodette/todomvc/tree/gh-pages/labs/architecture-examples/om)

1 (ns advenjure.items-test

2 (:require [clojure.test :refer :all]

3 [advenjure.items :refer :all]))

4

16 )

17

18 (ns org.enclojure.ide.nb.actions.token-navigator

19 (:use

20 org.enclojure.ide.navigator.token-nav

21 )

22 (:require

23 [org.enclojure.commons.c-slf4j :as logger]

24 )

25 (:import

1 usePlugin 'clojure'

2

3 group = 'vimclojure'

7

8 gradleHomeRepo repositories

9 clojureSnapshotsRepo repositories

10

11 repositories {

14

15 configurations {

16 clojure {

17 visible = false

18 description = 'Compile only configuration for clojure'

21

22 dependencies {

23 clojure 'org.clojure:clojure:1.0.0'

24 }

25

3 [antq.dep.gradle :as sut]

4 [antq.record :as r]

5 [clojure.java.io :as io]

6 [clojure.test :as t]))

25 (java-dependency {:name "org.clojure/tools.namespace" :version "1.0.0"})

26 (java-dependency {:name "org.clojure/clojure" :version "1.10.0"})])

27

28 (t/deftest extract-deps-test

33 actual-deps (set deps)]

34 ;; NOTE: Gradle on local additionally detects `nrepl/nrepl`

35 ;; And also, gradle on GitHub Actions additionally detects `org.clojure/java.classpath`

36 ;; So we check only dependencies which is explicitly defined in buld.gradle.

37 (t/is (every? #(contains? actual-deps %) defined-deps))))

1 (ns checked.models.issue

2 (:require [clojure.java.jdbc :as sql]

3 [environ.core :refer [env]]))

4

1 (defproject com.breezeehr/hitch "0.1.7-SNAPSHOT"

2 :description "A Clojurescript library designed to manage and cache derived data."

3 :url "https://github.com/Breezeemr/hitch"

4 :license {:name "Eclipse Public License"

14 :profiles

15 {:provided

16 {:dependencies [[org.clojure/clojure "1.8.0"]

17 [org.clojure/clojurescript "1.8.51"]]}

1 (ns programming-clojure.protocols

2 (:import (java.lang StringBuilder)

3 (java.io FileInputStream InputStreamReader BufferedReader FileOutputStream

4 (java.lang.ClassCastException)))

5

6 ;; Oh boy here we go: the Clojure RIBBIT protocol decoder.

7 ;; Check out this cool RFC on the RIBBIT protocol: http://frog.tips/api/1/

8

3 [tech.v3.datatype.functional :as dfn]

4 [tech.v3.libs.smile.data :as smile-data]

5 [clojure.test :refer [deftest is]])

6 (:import [smile.data DataFrame]))

7

2 (:import [java.nio.file Files]

3 [java.nio.file.attribute FileAttribute])

4 (:require [clojure.string :as string]

5 [clojure.java.io :as io]

6 [clojure.java.shell :refer [sh]]

7 [leiningen.jupyter.params :as params]))

8

3 (:use aleph

4 analytics.clj.routing

5 clojure.contrib.str-utils

6 [clojure.contrib.duck-streams :only [pwd]])

4 <a href='https://typedclojure.org'><img src='images/part-of-typed-clojure-project.png'></a>

5

6 Automatic annotator for Typed Clojure and clojure.spec annotations, for JVM Clojure.

7

8 ## Releases and Dependency Information

10 Latest stable release is 1.0.19.

11

12 * [All Released Versions](https://clojars.org/org.typedclojure/typed.clj.annotator)

13

14 [deps.edn](https://clojure.org/reference/deps_and_cli) JAR dependency information:

15

16 ```clj

17 org.typedclojure/typed.clj.annotator {:mvn/version "1.0.19"}

18 ```

19

25 org.typedclojure/typed.clj.annotator

26 {:git/url "https://github.com/typedclojure/typedclojure"

27 :deps/root "typed/clj.annotator"

28 :tag "1.0.19"}

10

11 (ns net.cgrand.dispatch

12 (:use [clojure.contrib.test-is :as test-is :only [set-test with-test is]]))

13

14 (defn add-route [root path handler]

3 After 14 months (including a break), over 3,000 commits and who knows how many story points, bug fixes, data uploads, coffees and cakes, we finished working for GDS on Friday. There are always mixed feelings when leaving a project, particularly one you're so proud of. It's always sad to say goodbye to people you've worked closely with, and it can be hard giving up control of something you've put so much energy into. Luckily we know we've left the project in good hands -- we've been working alongside them for months. And if they think our leaving is a chance to cut-corners, stop testing or let other bad habits creep in, they shouldn't forget [we will be watching them](https://github.com/alphagov/whitehall)!

4

5 Working on [Inside Government](https://www.gov.uk/government) has been a big commitment, and has taken a bit of energy out of us as a company. So for at least the next month we're going to concentrate on our own projects. For the most part that means improving and promoting [Harmonia](https://harmonia.io), but also includes writing some more blog posts, attending more developer events (such as Clojure eXchange on Thursday) and organising our Christmas.

6

7 Speaking of which, I hope you're all coming to our Christmas party on the evening of the 19th. Expect mince pies, mulled wine, alcohol, soft drinks and a general overflowing of christmas cheer. Or at least as much as we can summon in our office.

1 (ns atompit.devbuild

2 (:require [clojure.java.io :as io]

3 [me.raynes.conch.low-level :as sh]

4 [hawk.core :as hawk]

15 ;;

16 (ns waiter.util.semaphore-test

17 (:require [clojure.test :refer :all]

18 [waiter.util.semaphore :refer :all])

19 (:import (waiter.util.semaphore NonBlockingSemaphore)))

1 (ns ip-service.test.handler

2 (:require [clojure.test :refer :all]

3 [ip-service.handler :refer :all]

4 [clojure.data.json :as json]

1 (ns lambdacd.util.internal.temp-test

2 (:require [clojure.test :refer :all]

3 [lambdacd.util.internal.temp :refer :all]

4 [clojure.java.io :as io]

3 [org.nd4j.linalg.dataset MultiDataSet])

4 (:require [dl4clj.utils :refer [contains-many? obj-or-code?]]

5 [clojure.core.match :refer [match]]

6 [nd4clj.linalg.factory.nd4j :refer [vec-or-matrix->indarray]]))

7

34 .apache .hljs-cbracket,

35 .tex .hljs-command,

36 .clojure .hljs-title,

37 .coffeescript .hljs-attribute {

38 color: #FF0;

54 .bash .hljs-variable,

55 .tex .hljs-special,

56 .clojure .hljs-built_in {

57 color: #FFF;

58 }

75 .smalltalk .hljs-symbol,

76 .smalltalk .hljs-char,

77 .clojure .hljs-attribute {

78 color: #0F0;

79 }

1 ;;; browse.clj -- start a web browser from Clojure

2

3 ; Copyright (c) Christophe Grand, December 2008. All rights reserved.

13 ^{:author "Christophe Grand",

14 :deprecated "1.2"

15 :doc "Start a web browser from Clojure"}

16 clojure.contrib.javadoc.browse

17 (:require [clojure.contrib.shell :as sh])

18 (:import (java.net URI)))

19

30 [url]

31 (try

32 (when (clojure.lang.Reflector/invokeStaticMethod "java.awt.Desktop"

33 "isDesktopSupported" (to-array nil))

34 (-> (clojure.lang.Reflector/invokeStaticMethod "java.awt.Desktop"

1 (ns spire.config

2 (:require [clojure.java.io :as io])

3 (:import [java.util Base64]))

4

1 (ns beer-song-test

2 (:require [clojure.test :refer [deftest is]]

3 beer-song))

4

2 (:use protege.core)

3 (:require

4 [clojure-csv.core :as csv]

5 [semantic-csv.core :as sc :refer :all])

6 (:import

1 <div class="doc-item" id="doc-1217"><h2 class="doc-item-name">join<span class="namespace">(clojure.set)</span></h2><ul class="var-arglists"><li>(<span class="var-name">join</span> xrel yrel)</li><li>(<span class="var-name">join</span> xrel yrel km)</li></ul><div class="var-docstring"><p>When passed 2 rels, returns the rel corresponding to the natural

2 join. When passed an additional keymap, joins on the corresponding

3 keys.</p></div><div class="var-source"><pre>; set.clj:99

1 (ns clojure-euler.euler19)

2

3 ;;How many Sundays where on the first of the month

1 (ns ^{:doc "Reads, parses ragams from file, and makes them accessible"}

2 movertone.ragams

3 (:require [clojure.edn :as edn]

4 [clojure.java.io :as io]

5 [clojure.pprint :as pp]

6 [medley.core :as m]

7 [movertone.db :as db]))

7 ; You must not remove this notice, or any other, from this software.

8

9 (ns clojure.tools.deps.alpha.extensions.faken

10 (:require

11 [clojure.java.io :as jio]

12 [clojure.string :as str]

13 [clojure.tools.deps.alpha.extensions :as ext])

1 (ns #^{:doc "Soy helpers." :author "Roman Scherer"}

2 closure.templates.soy

3 (:refer-clojure :exclude (replace))

4 (:import java.io.File java.net.URL java.net.URI)

5 (:use [clojure.contrib.def :only (defvar)]

6 [clojure.string :only (blank? replace)]

7 [inflections.core :only (camelize underscore)]))

8

1 (ns lupapalvelu.ui.auth-admin.stamp.field-types

2 (:require [clojure.string :as string]

3 [rum.core :as rum]

4 [lupapalvelu.attachment.stamp-schema :as ss]

1 Compojure is an open source web framework for the [Clojure](http://clojure.org)

2 programming language. It emphasizes a thin I/O layer and a functional approach

3 to web development.

27 To run Compojure, you'll need:

28

29 * The [Clojure](http://clojure.org) programming language

30 * The [Clojure-Contrib](http://code.google.com/p/clojure-contrib/) library

1 =====================================

2 Clojure で Web 開発をはじめてみよう

3 =====================================

4

5 Clojure の活用例は多岐に渡りますが、そのうちのひとつ Web 開発についてここでは触れたいと思います。

6

7 .. raw:: html

8

9 <iframe src="https://ghbtns.com/github-btn.html?user=ayato-p&repo=clojure-beginner&type=star&count=true" frameborder="0" scrolling="0" width="170px" height="20px"></iframe>

10

11 まえがき

18 また、この中で書いていくコードは基本的に全て以下のリポジトリにコミットしていくので分からなければそちらも確認ください。

19

20 * `ayato-p/intro-web-clojure <https://github.com/ayato-p/intro-web-clojure>`_

21

22 中身について

90 .ruby .hljs-symbol .hljs-string,

91 .lisp .hljs-keyword,

92 .clojure .hljs-keyword,

93 .scheme .hljs-keyword,

94 .tex .hljs-special,

16 ;;

17

18 (ns org.apache.clojure-mxnet.primitives-test

19 (:require [org.apache.clojure-mxnet.primitives :as primitives]

20 [clojure.test :refer :all])

21 (:import (org.apache.mxnet MX_PRIMITIVES$MX_PRIMITIVE_TYPE

22 MX_PRIMITIVES$MX_FLOAT

9 (ns #^{:doc ""

10 :author "Chas Emerick"}

11 clojure.tools.nrepl.helpers-test

12 (:import (java.io File))

13 (:use [clojure.tools.nrepl-test :only (def-repl-test repl-server-fixture)]

14 clojure.test)

15 (:require

16 [clojure.tools.nrepl :as nrepl]

17 [clojure.tools.nrepl.helpers :as helpers]))

18

19 (use-fixtures :once repl-server-fixture)

37 (def-repl-test load-file-with-debug-info

38 (repl-receive (helpers/load-file-command

39 (File. "load-file-test/clojure/tools/nrepl/load_file_sample.clj")

40 (File. "load-file-test")))

41 (repl-receive (helpers/load-file-command

22 (java.util.zip GZIPInputStream GZIPOutputStream)

23 )

24 (:require [clojure.java.io :as io]

25 [clojure.string :as s]

4 [riemann.test :refer [tap io with-test-env inject! fresh-results *results* *taps*]]

5 [riemann.time.controlled :refer :all]

6 [clojure.test :refer :all]))

7

8 (defmacro bound

1 <h1 id="toc0">An Overview of the Clojure Core API</h1>

2 <h4>This is API documentation for the latest committed checkin of the Clojure core.</h4>

3 <h3>Important Clojure resources</h3>

4 <ul>

5 <li>The official source code for clojure is on the

6 <a href="http://github.com/richhickey/clojure/">

7 Clojure GitHub source page

8 </a>.

9 </li>

10 <li>Issues and other information for clojure are maintained in the

11 <a href="http://www.assembla.com/spaces/dashboard/index/clojure">

12 Clojure Assembla space

13 </a>.

14 </li>

22

23

24 namespace clojure.lang.CljCompiler.Ast

25 {

26 class TheVarExpr : Expr

1 (ns wwmm.pubcrawler.core

2 (:require [com.twinql.clojure.http :as http])

3 (:import

4 (java.io StringReader)

1 (ns rsa-cryptography.test.core

2 (:use [rsa-cryptography.core] :reload)

3 (:use [clojure.test]))

4

5 (deftest big-integer-test

1 (ns provisdom.spectomic.specs

2 (:require

3 [clojure.spec.alpha :as s]

4 [clojure.spec.gen.alpha :as gen]

5 [clojure.string :as str]

6 [clojure.spec.alpha :as s]))

64 .hljs-number,

65 .css .hljs-function,

66 .clojure .hljs-attribute {

67 color: #066;

68 }