russell@unturf.com
8d66bc01f1
Port mnemonic embedded verbatim across our source files: 8 ~= B (implied infinity B flattened; bake a cake; baby & me) 3 ~= E (backward) 2 ~= N (pivoted 90 degrees) 0 ~= D (flattened) Files touched: - examples/cuda-fanout/gpu-worker.lsp (*worker-port*) - examples/cuda-fanout/bend.lsp (*bend-worker-port*) - examples/cuda-fanout/mock-worker.py (PORT) - examples/cuda-fanout/bench_tiers.py (asm tier fixed port) - examples/cuda-fanout/smoke-bend.lsp + smoke-bend-asm.lsp - examples/cuda-fanout/README.md - www/bend.html (catalog + multi-host text) - Makefile (PORT default + comment) bend.html updates 3090-ai + ai (4090) fleet table to active 2-node mesh on 8320 — qwen moves off ai, bend takes over.
24 lines
751 B
Common Lisp
24 lines
751 B
Common Lisp
;;; smoke-bend-asm.lsp -- asm-tier-compatible bend test.
|
|
;;;
|
|
;;; asm tier doesn't have define-syntax, so we can't use the (bend ...)
|
|
;;; macro. The function-form bend!-call is the portable path.
|
|
;;;
|
|
;;; Prereqs:
|
|
;;; - gpu-worker.lsp running on 127.0.0.1:8320 (BEND mnemonic; Python or C tier)
|
|
;;; - cuda-shake-fanout binary reachable from that worker
|
|
;;;
|
|
;;; Run on asm tier:
|
|
;;; ./lumbda-asm smoke-bend-asm.lsp
|
|
|
|
(load "wire.lsp")
|
|
(load "bend.lsp")
|
|
|
|
(display "=== smoke-bend-asm ===\n")
|
|
|
|
(display "1. worker available? ")
|
|
(display (bend-worker-available?))
|
|
(newline)
|
|
|
|
(display "2. bend!-call '(cuda-shake-fanout (\"00\" \"01\" \"deadbeef\") 32): ")
|
|
(let ((r (bend!-call '(cuda-shake-fanout ("00" "01" "deadbeef") 32))))
|
|
(display r) (newline))
|