diff --git a/hub/constraints/instruction-handling/call/precompiles/modexp/common.lisp b/hub/constraints/instruction-handling/call/precompiles/modexp/common.lisp
index 2066b18c..f8b58381 100644
--- a/hub/constraints/instruction-handling/call/precompiles/modexp/common.lisp
+++ b/hub/constraints/instruction-handling/call/precompiles/modexp/common.lisp
@@ -195,7 +195,7 @@
                   (set-OOB-instruction---modexp-lead    precompile-processing---MODEXP---misc-row-offset---leading-word-analysis   ;; offset
                                                         (precompile-processing---MODEXP---bbs-lo)                                  ;; low part of bbs (base     byte size)
                                                         (precompile-processing---dup-cds)                                          ;; call data size
-                                                        (precompile-processing---MODEXP---bbs-lo)                                  ;; low part of ebs (exponent byte size)
+                                                        (precompile-processing---MODEXP---ebs-lo)                                  ;; low part of ebs (exponent byte size)
                                                         ))
 
 (defun    (precompile-processing---MODEXP---load-lead)     (*    (precompile-processing---MODEXP---extract-bbs)    (shift    [misc/OOB_DATA  4]    precompile-processing---MODEXP---misc-row-offset---leading-word-analysis)))