hs: query targets, prolog hook, loop scripts, new plans, WASM regen
Hyperscript compiler/runtime:
- query target support in set/fire/put commands
- hs-set-prolog-hook! / hs-prolog-hook / hs-prolog in runtime
- runtime log-capture cleanup
Scripts: sx-loops-up/down, sx-hs-e-up/down, sx-primitives-down
Plans: datalog, elixir, elm, go, koka, minikanren, ocaml, hs-bucket-f,
designs (breakpoint, null-safety, step-limit, tell, cookies, eval,
plugin-system)
lib/prolog/hs-bridge.sx: initial hook-based bridge draft
lib/common-lisp/tests/runtime.sx: CL runtime tests
WASM: regenerate sx_browser.bc.js from updated hs sources
Co-Authored-By: Claude Sonnet 4.6 <noreply@anthropic.com>
This commit is contained in:
41
scripts/sx-hs-e-down.sh
Executable file
41
scripts/sx-hs-e-down.sh
Executable file
@@ -0,0 +1,41 @@
|
||||
#!/usr/bin/env bash
|
||||
# Stop the sx-hs-e tmux session. Optionally (--clean) remove worktrees.
|
||||
set -euo pipefail
|
||||
|
||||
SESSION="sx-hs-e"
|
||||
WORKTREE_BASE="/root/rose-ash-e"
|
||||
CLEAN=0
|
||||
|
||||
for arg in "$@"; do
|
||||
case "$arg" in
|
||||
--clean) CLEAN=1 ;;
|
||||
*) echo "Unknown arg: $arg"; exit 2 ;;
|
||||
esac
|
||||
done
|
||||
|
||||
if tmux has-session -t "$SESSION" 2>/dev/null; then
|
||||
WINDOWS=$(tmux list-windows -t "$SESSION" -F '#W')
|
||||
for w in $WINDOWS; do
|
||||
tmux send-keys -t "$SESSION:$w" "/exit" C-m 2>/dev/null || true
|
||||
done
|
||||
echo "Sent /exit to all windows. Waiting 5s..."
|
||||
sleep 5
|
||||
tmux kill-session -t "$SESSION"
|
||||
echo "Killed tmux session '$SESSION'."
|
||||
else
|
||||
echo "No $SESSION tmux session running."
|
||||
fi
|
||||
|
||||
if [ "$CLEAN" = "1" ]; then
|
||||
cd "$(dirname "$0")/.."
|
||||
for item in e36 e37 e38 e39 e40; do
|
||||
wt="$WORKTREE_BASE/$item"
|
||||
if [ -d "$wt" ]; then
|
||||
git worktree remove --force "$wt" 2>/dev/null || rm -rf "$wt"
|
||||
echo "Removed worktree: $wt"
|
||||
fi
|
||||
done
|
||||
git worktree prune
|
||||
echo "Branches preserved. Remove manually if desired:"
|
||||
echo " git branch -D hs-e36-websocket hs-e37-tokenizer hs-e38-sourceinfo hs-e39-webworker hs-e40-fetch"
|
||||
fi
|
||||
Reference in New Issue
Block a user