Public Vars

vector (clj)

function

(vector) (vector a) (vector a b) (vector a b c) (vector a b c d) (vector a b c d e) (vector a b c d e f) (vector a b c d e f & args)

Creates a new vector containing the args.

Examples

babashka/babashka

(ns babashka.impl.rrb-vector
  (:require [clojure.core.rrb-vector :as rrb]
            [sci.core :as sci]))

(def rrbns (sci/create-ns 'clojure.core.rrb-vector))

(def rrb-vector-namespace {'catvec (sci/copy-var rrb/catvec rrbns)})

pedestal/pedestal

(ns io.pedestal.interceptor.error
  (:require [io.pedestal.interceptor :as interceptor]
            [clojure.core.match :as match]))

  `:exception-type` is a keyword of the exception's type, for example,
  `:java.lang.ArithmeticException
  "
  [binding-vector & match-forms]
  `(io.pedestal.interceptor/interceptor
     {:error (fn ~binding-vector
               (clojure.core.match/match [(ex-data ~(second binding-vector))]
                  ~@match-forms))}))

nextjournal/clerk

(ns viewers.controls
  "Demo of Clerk's two-way bindings."
  {:nextjournal.clerk/visibility {:code :show :result :show}}
  (:require [clojure.core :as core]
            [nextjournal.clerk :as clerk]
            [nextjournal.clerk.viewer :as viewer]))

^{::clerk/viewer {:transform-fn transform-var
                  :render-fn '#(vector nextjournal.clerk.render/inspect @%)}}
#'number-atom

hraberg/deuce

(ns deuce.emacs.ccl
  (:use [deuce.emacs-lisp :only (defun defvar)])
  (:require [clojure.core :as c])
  (:refer-clojure :exclude []))

(defvar code-conversion-map-vector nil
  "Vector of code conversion maps.")

(defvar translation-hash-table-vector nil
  "Vector containing all translation hash tables ever defined.
  Comprises pairs (SYMBOL . TABLE) where SYMBOL and TABLE were set up by calls
  to `define-translation-hash-table'.  The vector is indexed by the table id
  used by CCL.")

(defun register-ccl-program (name ccl-prog)
  "Register CCL program CCL-PROG as NAME in `ccl-program-table'.
  CCL-PROG should be a compiled CCL program (vector), or nil.
  If it is nil, just reserve NAME as a CCL program name.
  Return index number of the registered CCL program."
  )

  REGISTERS is a vector of [R0 R1 ... R7] where RN is an initial value
  for the Nth register.

  STATUS is a vector of [R0 R1 ... R7 IC], where
   R0..R7 are initial values of corresponding registers,
   IC is the instruction counter specifying from where to start the program.
  If R0..R7 are nil, they are initialized to 0.
  If IC is nil, it is initialized to head of the CCL program.

hraberg/deuce

(ns deuce.emacs.font
  (:use [deuce.emacs-lisp :only (defun defvar)])
  (:require [clojure.core :as c])
  (:refer-clojure :exclude []))

(defvar font-width-table nil
  "Alist of font width symbols vs the corresponding numeric values.
  See `font-weight-table' for the format of the vector.")

(defvar font-slant-table nil
  "Vector of font slant symbols vs the corresponding numeric values.
  See `font-weight-table' for the format of the vector.")

(defun font-get-glyphs (font-object from to &optional object)
  "Return a vector of FONT-OBJECT's glyphs for the specified characters.
  FROM and TO are positions (integers or markers) specifying a region
  of the current buffer.
  If the optional fourth arg OBJECT is not nil, it is a string or a
  vector containing the target characters.

  Each element is a vector containing information of a glyph in this format:
    [FROM-IDX TO-IDX C CODE WIDTH LBEARING RBEARING ASCENT DESCENT ADJUSTMENT]
  where
    FROM is an index numbers of a character the glyph corresponds to.
    TO is the same as FROM.
    C is the character of the glyph.
    CODE is the glyph-code of C in FONT-OBJECT.
    WIDTH thru DESCENT are the metrics (in pixels) of the glyph.
    ADJUSTMENT is always nil.
  If FONT-OBJECT doesn't have a glyph for a character,
  the corresponding element is nil."
  )

(defun query-font (font-object)
  "Return information about FONT-OBJECT.
  The value is a vector:
    [ NAME FILENAME PIXEL-SIZE SIZE ASCENT DESCENT SPACE-WIDTH AVERAGE-WIDTH
      CAPABILITY ]