Remove js implementations of structs and map update

bryanjos · bryanjos · commit 76bb6f85bc88 · 2017-04-05T22:57:00.000-05:00
diff --git a/src/javascript/lib/core/functions.js b/src/javascript/lib/core/functions.js
@@ -64,42 +64,6 @@ function get_global() {
   throw new Error('No global state found');
 }
 
-function defstruct(defaults) {
-  return class {
-    constructor(update = {}) {
-      const the_values = Object.assign(defaults, update);
-      Object.assign(this, the_values);
-    }
-
-    static create(updates = {}) {
-      const x = new this(updates);
-      return Object.freeze(x);
-    }
-  };
-}
-
-function defexception(defaults) {
-  return class extends Error {
-    constructor(update = {}) {
-      const message = update.message || '';
-      super(message);
-
-      const the_values = Object.assign(defaults, update);
-      Object.assign(this, the_values);
-
-      this.name = this.constructor.name;
-      this.message = message;
-      this[Symbol.for('__exception__')] = true;
-      Error.captureStackTrace(this, this.constructor.name);
-    }
-
-    static create(updates = {}) {
-      const x = new this(updates);
-      return Object.freeze(x);
-    }
-  };
-}
-
 function defprotocol(spec) {
   return new Protocol(spec);
 }
@@ -134,8 +98,6 @@ function build_namespace(ns, ns_string) {
 export default {
   call_property,
   get_global,
-  defstruct,
-  defexception,
   defprotocol,
   defimpl,
   build_namespace,
diff --git a/src/javascript/lib/core/special_forms.js b/src/javascript/lib/core/special_forms.js
@@ -14,12 +14,6 @@ function cond(clauses) {
   throw new Error();
 }
 
-function map_update(map, values) {
-  return Object.freeze(
-    Object.assign(Object.create(map.constructor.prototype), map, values),
-  );
-}
-
 function _for(expression, generators, collectable_protocol, into = []) {
   let [result, fun] = collectable_protocol.into(into);
 
