wyreframe 0.1.0

package/src/parser/Core/Position.mjs

@@ -0,0 +1,83 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+
+function make(row, col) {
+  return {
+    row: row,
+    col: col
+  };
+}
+
+function right(pos, nOpt) {
+  let n = nOpt !== undefined ? nOpt : 1;
+  return {
+    row: pos.row,
+    col: pos.col + n | 0
+  };
+}
+
+function down(pos, nOpt) {
+  let n = nOpt !== undefined ? nOpt : 1;
+  return {
+    row: pos.row + n | 0,
+    col: pos.col
+  };
+}
+
+function left(pos, nOpt) {
+  let n = nOpt !== undefined ? nOpt : 1;
+  return {
+    row: pos.row,
+    col: pos.col - n | 0
+  };
+}
+
+function up(pos, nOpt) {
+  let n = nOpt !== undefined ? nOpt : 1;
+  return {
+    row: pos.row - n | 0,
+    col: pos.col
+  };
+}
+
+function equals(a, b) {
+  if (a.row === b.row) {
+    return a.col === b.col;
+  } else {
+    return false;
+  }
+}
+
+function toString(pos) {
+  let rowStr = (pos.row + 1 | 0).toString();
+  let colStr = (pos.col + 1 | 0).toString();
+  return "(" + rowStr + ", " + colStr + ")";
+}
+
+function fromUserCoords(row, col) {
+  return {
+    row: row - 1 | 0,
+    col: col - 1 | 0
+  };
+}
+
+function isWithin(pos, bounds) {
+  if (pos.row >= bounds.top && pos.row <= bounds.bottom && pos.col >= bounds.left) {
+    return pos.col <= bounds.right;
+  } else {
+    return false;
+  }
+}
+
+export {
+  make,
+  right,
+  down,
+  left,
+  up,
+  equals,
+  toString,
+  fromUserCoords,
+  isWithin,
+}
+/* No side effect */

package/src/parser/Core/Position.res

@@ -0,0 +1,54 @@
+// Position.res
+// Represents a position in the 2D grid with row and column coordinates
+
+type t = {
+  row: int,
+  col: int,
+}
+
+// Create a position
+let make = (row: int, col: int): t => {
+  {row, col}
+}
+
+// Navigation functions
+let right = (pos: t, ~n: int=1): t => {
+  {row: pos.row, col: pos.col + n}
+}
+
+let down = (pos: t, ~n: int=1): t => {
+  {row: pos.row + n, col: pos.col}
+}
+
+let left = (pos: t, ~n: int=1): t => {
+  {row: pos.row, col: pos.col - n}
+}
+
+let up = (pos: t, ~n: int=1): t => {
+  {row: pos.row - n, col: pos.col}
+}
+
+// Equality
+let equals = (a: t, b: t): bool => {
+  a.row == b.row && a.col == b.col
+}
+
+// String representation (1-indexed for user display)  
+let toString = (pos: t): string => {
+  let rowStr = Int.toString(pos.row + 1)
+  let colStr = Int.toString(pos.col + 1)
+  "(" ++ rowStr ++ ", " ++ colStr ++ ")"
+}
+
+// Create from user-friendly 1-indexed coordinates
+let fromUserCoords = (row: int, col: int): t => {
+  {row: row - 1, col: col - 1}
+}
+
+// Check if position is within bounds (inclusive)
+let isWithin = (pos: t, bounds: Types.Bounds.t): bool => {
+  pos.row >= bounds.top &&
+  pos.row <= bounds.bottom &&
+  pos.col >= bounds.left &&
+  pos.col <= bounds.right
+}

package/src/parser/Core/Types.mjs

@@ -0,0 +1,435 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as Core__Int from "@rescript/core/src/Core__Int.mjs";
+import * as Primitive_module from "@rescript/runtime/lib/es6/Primitive_module.js";
+import * as Primitive_option from "@rescript/runtime/lib/es6/Primitive_option.js";
+
+let Position = Primitive_module.init([
+  "Types.res",
+  19,
+  4
+], {
+  TAG: "Module",
+  _0: [
+    [
+      "Function",
+      "make"
+    ],
+    [
+      "Function",
+      "right"
+    ],
+    [
+      "Function",
+      "down"
+    ],
+    [
+      "Function",
+      "left"
+    ],
+    [
+      "Function",
+      "up"
+    ],
+    [
+      "Function",
+      "equals"
+    ],
+    [
+      "Function",
+      "isWithin"
+    ],
+    [
+      "Function",
+      "toString"
+    ]
+  ]
+});
+
+let Bounds = Primitive_module.init([
+  "Types.res",
+  76,
+  4
+], {
+  TAG: "Module",
+  _0: [
+    [
+      "Function",
+      "make"
+    ],
+    [
+      "Function",
+      "width"
+    ],
+    [
+      "Function",
+      "height"
+    ],
+    [
+      "Function",
+      "area"
+    ],
+    [
+      "Function",
+      "contains"
+    ],
+    [
+      "Function",
+      "overlaps"
+    ],
+    [
+      "Function",
+      "equals"
+    ]
+  ]
+});
+
+function make(row, col) {
+  return {
+    row: row,
+    col: col
+  };
+}
+
+function right(pos, nOpt) {
+  let n = nOpt !== undefined ? nOpt : 1;
+  return {
+    row: pos.row,
+    col: pos.col + n | 0
+  };
+}
+
+function down(pos, nOpt) {
+  let n = nOpt !== undefined ? nOpt : 1;
+  return {
+    row: pos.row + n | 0,
+    col: pos.col
+  };
+}
+
+function left(pos, nOpt) {
+  let n = nOpt !== undefined ? nOpt : 1;
+  return {
+    row: pos.row,
+    col: pos.col - n | 0
+  };
+}
+
+function up(pos, nOpt) {
+  let n = nOpt !== undefined ? nOpt : 1;
+  return {
+    row: pos.row - n | 0,
+    col: pos.col
+  };
+}
+
+function equals(a, b) {
+  if (a.row === b.row) {
+    return a.col === b.col;
+  } else {
+    return false;
+  }
+}
+
+function isWithin(pos, bounds) {
+  if (pos.row >= bounds.top && pos.row <= bounds.bottom && pos.col >= bounds.left) {
+    return pos.col <= bounds.right;
+  } else {
+    return false;
+  }
+}
+
+function toString(pos) {
+  return `(` + pos.row.toString() + `, ` + pos.col.toString() + `)`;
+}
+
+Primitive_module.update({
+  TAG: "Module",
+  _0: [
+    [
+      "Function",
+      "make"
+    ],
+    [
+      "Function",
+      "right"
+    ],
+    [
+      "Function",
+      "down"
+    ],
+    [
+      "Function",
+      "left"
+    ],
+    [
+      "Function",
+      "up"
+    ],
+    [
+      "Function",
+      "equals"
+    ],
+    [
+      "Function",
+      "isWithin"
+    ],
+    [
+      "Function",
+      "toString"
+    ]
+  ]
+}, Position, {
+  make: make,
+  right: right,
+  down: down,
+  left: left,
+  up: up,
+  equals: equals,
+  isWithin: isWithin,
+  toString: toString
+});
+
+function make$1(top, left, bottom, right) {
+  return {
+    top: top,
+    left: left,
+    bottom: bottom,
+    right: right
+  };
+}
+
+function width(bounds) {
+  return bounds.right - bounds.left | 0;
+}
+
+function height(bounds) {
+  return bounds.bottom - bounds.top | 0;
+}
+
+function area(bounds) {
+  return width(bounds) * height(bounds) | 0;
+}
+
+function contains(outer, inner) {
+  if (outer.top < inner.top && outer.left < inner.left && outer.bottom > inner.bottom) {
+    return outer.right > inner.right;
+  } else {
+    return false;
+  }
+}
+
+function overlaps(a, b) {
+  return !(a.right < b.left || b.right < a.left || a.bottom < b.top || b.bottom < a.top);
+}
+
+function equals$1(a, b) {
+  if (a.top === b.top && a.left === b.left && a.bottom === b.bottom) {
+    return a.right === b.right;
+  } else {
+    return false;
+  }
+}
+
+Primitive_module.update({
+  TAG: "Module",
+  _0: [
+    [
+      "Function",
+      "make"
+    ],
+    [
+      "Function",
+      "width"
+    ],
+    [
+      "Function",
+      "height"
+    ],
+    [
+      "Function",
+      "area"
+    ],
+    [
+      "Function",
+      "contains"
+    ],
+    [
+      "Function",
+      "overlaps"
+    ],
+    [
+      "Function",
+      "equals"
+    ]
+  ]
+}, Bounds, {
+  make: make$1,
+  width: width,
+  height: height,
+  area: area,
+  contains: contains,
+  overlaps: overlaps,
+  equals: equals$1
+});
+
+function getDeviceDimensions(device) {
+  if (typeof device !== "object") {
+    switch (device) {
+      case "Desktop" :
+        return {
+          width: 1440,
+          height: 900,
+          ratio: 16.0 / 10.0,
+          name: "desktop"
+        };
+      case "Laptop" :
+        return {
+          width: 1280,
+          height: 800,
+          ratio: 16.0 / 10.0,
+          name: "laptop"
+        };
+      case "Tablet" :
+        return {
+          width: 768,
+          height: 1024,
+          ratio: 3.0 / 4.0,
+          name: "tablet"
+        };
+      case "TabletLandscape" :
+        return {
+          width: 1024,
+          height: 768,
+          ratio: 4.0 / 3.0,
+          name: "tablet-landscape"
+        };
+      case "Mobile" :
+        return {
+          width: 375,
+          height: 812,
+          ratio: 375.0 / 812.0,
+          name: "mobile"
+        };
+      case "MobileLandscape" :
+        return {
+          width: 812,
+          height: 375,
+          ratio: 812.0 / 375.0,
+          name: "mobile-landscape"
+        };
+    }
+  } else {
+    let h = device._1;
+    let w = device._0;
+    return {
+      width: w,
+      height: h,
+      ratio: w / h,
+      name: "custom-" + w.toString() + "x" + h.toString()
+    };
+  }
+}
+
+function parseDeviceType(str) {
+  let normalized = str.trim().toLowerCase();
+  switch (normalized) {
+    case "desktop" :
+      return "Desktop";
+    case "laptop" :
+      return "Laptop";
+    case "mobile" :
+    case "phone" :
+      return "Mobile";
+    case "mobile-landscape" :
+    case "mobilelandscape" :
+    case "phone-landscape" :
+      return "MobileLandscape";
+    case "tablet" :
+      return "Tablet";
+    case "tablet-landscape" :
+    case "tabletlandscape" :
+      return "TabletLandscape";
+    default:
+      let customPattern = /^(\d+)\s*x\s*(\d+)$/i;
+      let result = customPattern.exec(normalized);
+      if (result === null) {
+        return;
+      }
+      let match = result[1];
+      let match$1 = result[2];
+      if (match === undefined) {
+        return;
+      }
+      if (match$1 === undefined) {
+        return;
+      }
+      let hNullable = Primitive_option.valFromOption(match$1);
+      let wNullable = Primitive_option.valFromOption(match);
+      if (wNullable == null) {
+        return;
+      }
+      if (hNullable == null) {
+        return;
+      }
+      let match$2 = Core__Int.fromString(wNullable, undefined);
+      let match$3 = Core__Int.fromString(hNullable, undefined);
+      if (match$2 !== undefined && match$3 !== undefined) {
+        return {
+          TAG: "Custom",
+          _0: match$2,
+          _1: match$3
+        };
+      } else {
+        return;
+      }
+  }
+}
+
+function getElementType(elem) {
+  switch (elem.TAG) {
+    case "Box" :
+      return "Box";
+    case "Button" :
+      return "Button";
+    case "Input" :
+      return "Input";
+    case "Link" :
+      return "Link";
+    case "Checkbox" :
+      return "Checkbox";
+    case "Text" :
+      return "Text";
+    case "Divider" :
+      return "Divider";
+    case "Row" :
+      return "Row";
+    case "Section" :
+      return "Section";
+  }
+}
+
+function getElementId(elem) {
+  switch (elem.TAG) {
+    case "Box" :
+      return elem.name;
+    case "Button" :
+    case "Input" :
+    case "Link" :
+      return elem.id;
+    case "Section" :
+      return elem.name;
+    default:
+      return;
+  }
+}
+
+export {
+  Position,
+  Bounds,
+  getDeviceDimensions,
+  parseDeviceType,
+  getElementType,
+  getElementId,
+}
+/* Position Not a pure module */