wao 0.27.0 → 0.27.2

package/cjs/toerl.js

@@ -0,0 +1,173 @@
+"use strict";
+
+Object.defineProperty(exports, "__esModule", {
+  value: true
+});
+exports["default"] = toErl;
+function _slicedToArray(r, e) { return _arrayWithHoles(r) || _iterableToArrayLimit(r, e) || _unsupportedIterableToArray(r, e) || _nonIterableRest(); }
+function _nonIterableRest() { throw new TypeError("Invalid attempt to destructure non-iterable instance.\nIn order to be iterable, non-array objects must have a [Symbol.iterator]() method."); }
+function _unsupportedIterableToArray(r, a) { if (r) { if ("string" == typeof r) return _arrayLikeToArray(r, a); var t = {}.toString.call(r).slice(8, -1); return "Object" === t && r.constructor && (t = r.constructor.name), "Map" === t || "Set" === t ? Array.from(r) : "Arguments" === t || /^(?:Ui|I)nt(?:8|16|32)(?:Clamped)?Array$/.test(t) ? _arrayLikeToArray(r, a) : void 0; } }
+function _arrayLikeToArray(r, a) { (null == a || a > r.length) && (a = r.length); for (var e = 0, n = Array(a); e < a; e++) n[e] = r[e]; return n; }
+function _iterableToArrayLimit(r, l) { var t = null == r ? null : "undefined" != typeof Symbol && r[Symbol.iterator] || r["@@iterator"]; if (null != t) { var e, n, i, u, a = [], f = !0, o = !1; try { if (i = (t = t.call(r)).next, 0 === l) { if (Object(t) !== t) return; f = !1; } else for (; !(f = (e = i.call(t)).done) && (a.push(e.value), a.length !== l); f = !0); } catch (r) { o = !0, n = r; } finally { try { if (!f && null != t["return"] && (u = t["return"](), Object(u) !== u)) return; } finally { if (o) throw n; } } return a; } }
+function _arrayWithHoles(r) { if (Array.isArray(r)) return r; }
+function _typeof(o) { "@babel/helpers - typeof"; return _typeof = "function" == typeof Symbol && "symbol" == typeof Symbol.iterator ? function (o) { return typeof o; } : function (o) { return o && "function" == typeof Symbol && o.constructor === Symbol && o !== Symbol.prototype ? "symbol" : typeof o; }, _typeof(o); }
+function toErl(obj) {
+  var indent = arguments.length > 1 && arguments[1] !== undefined ? arguments[1] : 0;
+  var spaces = " ".repeat(indent);
+
+  // Handle null (as atom)
+  if (obj === null) {
+    return "null"; // Erlang atom
+  }
+
+  // Handle undefined (as atom)
+  if (obj === undefined) {
+    return "undefined"; // Erlang atom
+  }
+
+  // Handle boolean (as atom)
+  if (typeof obj === "boolean") {
+    return obj.toString(); // true/false are atoms in Erlang
+  }
+
+  // Handle numbers
+  if (typeof obj === "number") {
+    if (Number.isInteger(obj)) {
+      return obj.toString();
+    } else {
+      // Format float properly
+      return obj.toString();
+    }
+  }
+
+  // Handle strings
+  if (typeof obj === "string") {
+    // Escape special characters
+    var escaped = obj.replace(/\\/g, "\\\\").replace(/"/g, '\\"').replace(/\n/g, "\\n").replace(/\r/g, "\\r").replace(/\t/g, "\\t");
+    return "<<\"".concat(escaped, "\">>");
+  }
+
+  // Handle symbols (as atom)
+  if (_typeof(obj) === "symbol") {
+    var desc = obj.description || "Symbol.for()";
+    // Check if it's a simple atom or needs quoting
+    if (/^[a-z][a-zA-Z0-9_]*$/.test(desc)) {
+      return desc; // Simple atom like: ok, error, undefined
+    } else {
+      return "'".concat(desc, "'"); // Quoted atom for special cases
+    }
+  }
+
+  // Handle Buffer/Binary
+  if (Buffer.isBuffer(obj) || obj && _typeof(obj) === "object" && obj.type === "Buffer" && Array.isArray(obj.data)) {
+    var data = Buffer.isBuffer(obj) ? obj : Buffer.from(obj.data);
+    if (data.length === 0) {
+      return "<<>>";
+    }
+    var bytes = Array.from(data).join(",");
+    return "<<".concat(bytes, ">>");
+  }
+
+  // Handle Arrays
+  if (Array.isArray(obj)) {
+    if (obj.length === 0) {
+      return "[]";
+    }
+    var items = obj.map(function (item) {
+      return toErl(item, indent + 2);
+    });
+
+    // Check if it fits on one line
+    var oneLine = "[".concat(items.join(", "), "]");
+    if (oneLine.length <= 80 && !items.some(function (item) {
+      return item.includes("\n");
+    })) {
+      return oneLine;
+    }
+
+    // Multi-line format
+    var inner = items.map(function (item) {
+      return "".concat(spaces, "  ").concat(item);
+    }).join(",\n");
+    return "[\n".concat(inner, "\n").concat(spaces, "]");
+  }
+
+  // Handle Objects/Maps
+  if (_typeof(obj) === "object" && obj !== null) {
+    var entries = Object.entries(obj);
+    if (entries.length === 0) {
+      return "#{}";
+    }
+    var pairs = entries.map(function (_ref) {
+      var _ref2 = _slicedToArray(_ref, 2),
+        key = _ref2[0],
+        value = _ref2[1];
+      var erlangKey = "<<\"".concat(key, "\">>");
+      var erlangValue = toErl(value, indent + 2);
+      return "".concat(erlangKey, " => ").concat(erlangValue);
+    });
+
+    // Check if it fits on one line
+    var _oneLine = "#{ ".concat(pairs.join(", "), " }");
+    if (_oneLine.length <= 80 && !pairs.some(function (pair) {
+      return pair.includes("\n");
+    })) {
+      return _oneLine;
+    }
+
+    // Multi-line format
+    var _inner = pairs.map(function (pair) {
+      return "".concat(spaces, "  ").concat(pair);
+    }).join(",\n");
+    return "#{\n".concat(_inner, "\n").concat(spaces, "}");
+  }
+
+  // Fallback
+  return "unknown";
+}
+
+// Helper function to convert JSON string or object
+function convert(input) {
+  var obj;
+
+  // If input is a string, try to parse it as JSON
+  if (typeof input === "string") {
+    try {
+      // First try to parse as JSON
+      obj = JSON.parse(input);
+    } catch (e) {
+      // If it fails, try to evaluate it (for cases with Symbol, Buffer, etc.)
+      try {
+        obj = eval("(".concat(input, ")"));
+      } catch (e2) {
+        throw new Error("Invalid input: not valid JSON or JavaScript object");
+      }
+    }
+  } else {
+    obj = input;
+  }
+  return toErl(obj);
+}
+
+// Function to format test case for Erlang
+function formatTestCase(obj) {
+  var testName = arguments.length > 1 && arguments[1] !== undefined ? arguments[1] : "test";
+  var erlangData = toErl(obj, 2);
+
+  // If it's a simple one-liner, put it inline
+  if (!erlangData.includes("\n") && erlangData.length < 60) {
+    return "".concat(testName, "_test() -> show(").concat(erlangData, ").");
+  }
+
+  // Multi-line format
+  return "".concat(testName, "_test() -> \n  show(").concat(erlangData, ").");
+}
+
+// Function to convert multiple test cases
+function convertMultiple(testCases) {
+  var baseTestName = arguments.length > 1 && arguments[1] !== undefined ? arguments[1] : "generated";
+  return testCases.map(function (testCase, index) {
+    var testName = "".concat(baseTestName, "_").concat(index + 1);
+    return formatTestCase(testCase, testName);
+  }).join("\n\n");
+}