Skip to content

Instantly share code, notes, and snippets.

@devrimbaris

devrimbaris/Functions.clj

Last active August 29, 2015 14:12
Show Gist options
  • Save devrimbaris/a140e416ff3efb23b5fe to your computer and use it in GitHub Desktop.
Save devrimbaris/a140e416ff3efb23b5fe to your computer and use it in GitHub Desktop.
Download ZIP

Revisions

  1. devrimbaris revised this gist Dec 30, 2014. 1 changed file with 1 addition and 1 deletion.
    2 changes: 1 addition & 1 deletion Functions.clj
    View file
    Original file line number Diff line number Diff line change
    @@ -12,7 +12,7 @@
    (defn run-rule-two-arguments
    "Assumes rule is defined in string like \"a > \"b."
    "Assumes rule is defined in string like "a > b."

    [rule-string & args]
    (let [parsed (stri/split rule-string #" ")
  2. devrimbaris revised this gist Dec 30, 2014. 1 changed file with 1 addition and 1 deletion.
    2 changes: 1 addition & 1 deletion Functions.clj
    View file
    Original file line number Diff line number Diff line change
    @@ -1,5 +1,5 @@
    (defn run-rule-one-argument
    "Assumes rule is defined in string like \"zero? \"b."
    "Assumes rule is defined in string like "zero? b."
    [rule-string & args]
    (let [parsed (stri/split rule-string #" ")
    rulefn (resolve (symbol (first parsed)))]
  3. devrimbaris created this gist Dec 30, 2014.
    25 changes: 25 additions & 0 deletions Functions.clj
    View file
    Original file line number Diff line number Diff line change
    @@ -0,0 +1,25 @@
    (defn run-rule-one-argument
    "Assumes rule is defined in string like \"zero? \"b."
    [rule-string & args]
    (let [parsed (stri/split rule-string #" ")
    rulefn (resolve (symbol (first parsed)))]
    (apply rulefn args)))


    (run-rule-one-argument "zero?" 7)

    (run-rule-one-argument "-" 9)


    (defn run-rule-two-arguments
    "Assumes rule is defined in string like \"a > \"b."

    [rule-string & args]
    (let [parsed (stri/split rule-string #" ")
    rulefn (resolve (symbol (second parsed)))]
    (apply rulefn args)))


    (run-rule-two-arguments "a > b" 5 7)

    (run-rule-two-arguments "a > b" 75 7)