Add stacked tiles feature to tiling mode

dark.css

@@ -37,4 +37,22 @@
 .pop-shell-gaps-entry {
     /* Seems to get the width just right to fit 3 digits */
     width: 75px;
-}
+}
+
+.pop-shell-tab {
+    border: 1px solid #333;
+    color: #000;
+    padding: 0 1em;
+}
+
+.pop-shell-tab-active {
+    background: #FBB86C;
+}
+
+.pop-shell-tab-inactive {
+    background: #9B8E8A;
+}
+
+.pop-shell-tab-urgent {
+    background: #D00;
+}

light.css

@@ -37,3 +37,21 @@
     /* Seems to get the width just right to fit 3 digits */
     width: 75px;
 }
+
+.pop-shell-tab {
+    border: 1px solid #333;
+    color: #000;
+    padding: 0 1em;
+}
+
+.pop-shell-tab-active {
+    background: #FFAD00;
+}
+
+.pop-shell-tab-inactive {
+    background: #9B8E8A;
+}
+
+.pop-shell-tab-urgent {
+    background: #D00;
+}

rebuild.sh

@@ -48,13 +48,13 @@ dconf write ${KEYS_GNOME_WM}/move-to-monitor-down "@as []"
 
 # Super + direction keys, move window left and right monitors, or up and down workspaces
 # Move window one monitor to the left
-dconf write ${KEYS_GNOME_WM}/move-to-monitor-left "['<Shift><Super>Left','<Shift><Super>${left}']"
+dconf write ${KEYS_GNOME_WM}/move-to-monitor-left "@as []"
 # Move window one workspace down
-dconf write ${KEYS_GNOME_WM}/move-to-workspace-down "['<Shift><Super>Down','<Shift><Super>${down}']"
+dconf write ${KEYS_GNOME_WM}/move-to-workspace-down "@as []"
 # Move window one workspace up
-dconf write ${KEYS_GNOME_WM}/move-to-workspace-up "['<Shift><Super>Up','<Shift><Super>${up}']"
+dconf write ${KEYS_GNOME_WM}/move-to-workspace-up "@as []"
 # Move window one monitor to the right
-dconf write ${KEYS_GNOME_WM}/move-to-monitor-right "['<Shift><Super>Right','<Shift><Super>${right}']"
+dconf write ${KEYS_GNOME_WM}/move-to-monitor-right "@as []"
 
 # Super + Ctrl + direction keys, change workspaces, move focus between monitors
 # Move to workspace below

schemas/org.gnome.shell.extensions.pop-shell.gschema.xml

@@ -76,6 +76,16 @@
         </key>
 
         <!-- Window Management Keys -->
+        <key type="as" name="toggle-stacking">
+            <default><![CDATA[['s']]]></default>
+            <summary>Toggle stacking mode inside management mode</summary>
+        </key>
+
+        <key type="as" name="toggle-stacking-global">
+            <default><![CDATA[['<Super>s']]]></default>
+            <summary>Toggle stacking mode outside management mode</summary>
+        </key>
+
         <key type="as" name="management-orientation">
             <default><![CDATA[['o']]]></default>
             <summary>Toggle tiling orientation</summary>
@@ -174,5 +184,37 @@
             <default><![CDATA[['<Primary>Right','<Primary>l']]]></default>
             <summary>Swap window right</summary>
         </key>
+
+        <!-- Workspace Management -->
+
+        <key type="as" name="pop-workspace-down">
+            <default><![CDATA[['<Super><Shift>Down','<Super><Shift>j']]]></default>
+            <summary>Move window to the lower workspace</summary>
+        </key>
+
+        <key type="as" name="pop-workspace-up">
+            <default><![CDATA[['<Super><Shift>Up','<Super><Shift>k']]]></default>
+            <summary>Move window to the upper workspace</summary>
+        </key>
+
+        <key type="as" name="pop-monitor-down">
+            <default><![CDATA[['<Super><Shift><Primary>Down','<Super><Shift><Primary>j']]]></default>
+            <summary>Move window to the lower monitor</summary>
+        </key>
+
+        <key type="as" name="pop-monitor-up">
+            <default><![CDATA[['<Super><Shift><Primary>Up','<Super><Shift><Primary>k']]]></default>
+            <summary>Move window to the upper monitor</summary>
+        </key>
+
+        <key type="as" name="pop-monitor-left">
+            <default><![CDATA[['<Super><Shift>Left','<Super><Shift>h']]]></default>
+            <summary>Move window to the leftward monitor</summary>
+        </key>
+
+        <key type="as" name="pop-monitor-right">
+            <default><![CDATA[['<Super><Shift>Right','<Super><Shift>l']]]></default>
+            <summary>Move window to the rightward monitor</summary>
+        </key>
     </schema>
 </schemalist>

src/arena.ts

@@ -0,0 +1,42 @@
+/** Hop slot arena allocator */
+export class Arena<T> {
+    private slots: Array<null | T> = new Array();
+    private unused: Array<number> = new Array()
+
+    truncate(n: number) {
+        this.slots.splice(n);
+        this.unused.splice(n);
+    }
+
+    get(n: number): null | T {
+        return this.slots[n];
+    }
+
+    insert(v: T): number {
+        let n;
+        const slot = this.unused.pop();
+        if (slot !== undefined) {
+            n = slot;
+            this.slots[n] = v;
+        } else {
+            n = this.slots.length;
+            this.slots.push(v);
+        }
+
+        return n;
+    }
+
+    remove(n: number): null | T {
+        if (this.slots[n] === null) return null;
+        const v = this.slots[n];
+        this.slots[n] = null;
+        this.unused.push(n);
+        return v;
+    }
+
+    * values(): IterableIterator<T> {
+        for (const v of this.slots) {
+            if (v !== null) yield v;
+        }
+    }
+}