summaryrefslogtreecommitdiff
path: root/fetch-wasm-instrs.lisp
diff options
context:
space:
mode:
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+)