killme2008/my_sigis.exs

Created October 23, 2015 04:14

Star (1) You must be signed in to star a gist
Fork (0) You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/killme2008/d8345301536980d1b64a.js"></script>
Save killme2008/d8345301536980d1b64a to your computer and use it in GitHub Desktop.

Download ZIP

Elixir custom sigis example

Raw

my_sigis.exs

	defmodule MySigils do
	def sigil_i(string, []), do: String.to_integer(string)
	def sigil_i(string, [?n]), do: -String.to_integer(string)
	end

Author

killme2008 commented Oct 23, 2015

(defn i [s]
  (let [s (str s)
        n? (.endsWith s "n")
        s (if n?
            (.substring s 0 (-> s (count) (dec)))
            s)
        x (Integer/valueOf s)]
    (if n?
      (- x)
      x)))

;;add reader
(alter-var-root #'default-data-readers assoc 'i i)

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment