Clojure: creating new instance from String class name

by

There are two good ways to do this. Which is best depends on the specific circumstance.

The first is reflection:

(clojure.lang.Reflector/invokeConstructor
  (resolve (symbol "Integer"))
  (to-array ["16"]))

That’s like calling (new Integer "16") …include any other ctor arguments you need in the to-array vector. This is easy, but slower at runtime than using new with sufficient type hints.

The second option is as fast as possible, but a bit more complicated, and uses eval:

(defn make-factory [classname & types]
  (let [args (map #(with-meta (symbol (str "x" %2)) {:tag %1}) types (range))]
    (eval `(fn [~@args] (new ~(symbol classname) ~@args)))))

(def int-factory (make-factory "Integer" 'String))

(int-factory "42")

The key point is to eval code that defines an anonymous function, as make-factory does. This is slow — slower than the reflection example above, so only do it as infrequently as possible such as once per class. But having done that you have a regular Clojure function that you can store somewhere, in a var like int-factory in this example, or in a hash-map or vector depending on how you’ll be using it. Regardless, this factory function will run at full compiled speed, can be inlined by HotSpot, etc. and will always run much faster than the reflection example.

When you’re specifically dealing with classes generated by deftype or defrecord, you can skip the type list since those classes always have exactly two ctors each with different arities. This allows something like:

(defn record-factory [recordname]
  (let [recordclass ^Class (resolve (symbol recordname))
        max-arg-count (apply max (map #(count (.getParameterTypes %))
                                      (.getConstructors recordclass)))
        args (map #(symbol (str "x" %)) (range (- max-arg-count 2)))]
    (eval `(fn [~@args] (new ~(symbol recordname) ~@args)))))


(defrecord ExampleRecord [a b c])

(def example-record-factory (record-factory "ExampleRecord"))

(example-record-factory "F." "Scott" 'Fitzgerald)

More Related Contents:

  1. Why do constructors not return values?
  2. Automapper – how to map to constructor parameters instead of property setters
  3. Colon after Constructor in dart
  4. Understanding Factory constructor code example – Dart
  5. How to override a structure constructor in fortran
  6. Should constructors comply with the Liskov Substitution Principle? [closed]
  7. how to define a constructor outside class in java?
  8. Rule-of-Three becomes Rule-of-Five with C++11? [closed]
  9. What is the reason to use the ‘new’ keyword at Derived.prototype = new Base
  10. Why copy constructor is not called in this case?
  11. Does the default constructor initialize built-in types?
  12. How to overload __init__ method based on argument type?
  13. C++ template constructor
  14. Chain-calling parent initialisers in python [duplicate]
  15. Inheritance in Java – creating an object of the subclass invokes also the constructor of the superclass. Why exactly?
  16. What is the function __construct used for?
  17. Is std::cout guaranteed to be initialized?
  18. Is there an alternative to bastard injection? (AKA poor man’s injection via default constructor)
  19. Initialize parent’s protected members with initialization list (C++)
  20. Constructor synchronization in Java
  21. What’s the most reliable way to prohibit a copy constructor in C++?
  22. Calling the base class constructor from the derived class constructor
  23. Asynchronous constructor
  24. Calling an async method from a constructor in Dart
  25. Creating an object: with or without `new` [duplicate]
  26. Can I use identical names for fields and constructor parameters?
  27. Clojure on Android [closed]
  28. How do I call New-Object for a constructor which takes a single array parameter?
  29. Constructing a map on anonymous function in Clojure
  30. Java N-Dimensional Arrays

Leave a Comment