summaryrefslogtreecommitdiff
path: root/fetch-wasm-instrs.lisp
diff options
context:
space:
mode:
authorcolin <colin@cicadas.surf>2024-06-01 17:27:31 -0700
committercolin <colin@cicadas.surf>2024-06-01 17:27:31 -0700
commitb56a869eadbd17e1f0a285ae9888485d9de22ca0 (patch)
tree6ad958c531dbf0dfa7f68fb8888a2f939eb8b29d /fetch-wasm-instrs.lisp
parent54d3ebe78702e64b8185f6df8da85ab329c26128 (diff)
Fix: bug in wasm instrs fetching scriptHEADmain
Diffstat (limited to 'fetch-wasm-instrs.lisp')
-rw-r--r--fetch-wasm-instrs.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/fetch-wasm-instrs.lisp b/fetch-wasm-instrs.lisp
index 677f857..e2cfaec 100644
--- a/fetch-wasm-instrs.lisp
+++ b/fetch-wasm-instrs.lisp
@@ -28,7 +28,7 @@
(let ((str (trim-junk str)))
(ppcre:split
", ?"
- (subseq str #.(length "Instruction(") (- (length str) 2)))))
+ (subseq str #.(length "Instruction(") (- (length str) 1)))))
(defun excise-instructions (source)
(let* ((start-pos (+ (length +start-instrs-pattern+)