diff --git a/wipforth.wat b/wipforth.wat
index c0d48d1..20ad8e0 100644
--- a/wipforth.wat
+++ b/wipforth.wat
@@ -1395,7 +1395,7 @@
  ;;
  ;;   DUP DUP 65 >= SWAP 90 <= AND  \ Test if A-Z
  ;;   0BRANCH [60]                  \ Jump to invalid digit if not
- ;;   45 -                          \ Get digit value
+ ;;   55 -                          \ Get digit value
  ;;
  ;;   DUP DUP 0>= SWAP BASE @ < AND \ Test if 0 <= value < BASE
  ;;   0BRANCH [8]                   \ Jump to invalid digit if not
@@ -1438,7 +1438,7 @@
        "\b4\04\00\00"  ;; 0BRANCH
        "\3c\00\00\00"  ;; 60
        "\18\04\00\00"  ;; LIT
-       "\2d\00\00\00"  ;; 45
+       "\37\00\00\00"  ;; 55
        "\cc\02\00\00"  ;; -
        "\08\02\00\00"  ;; DUP
        "\08\02\00\00"  ;; DUP