		Search-engine friendly clone of the ACL2 documentation.

Atj-common-code-generation

Atj-gen-jint

Generate Java code to build a Java int from a signed 32-bit ACL2 integer.

Signature
(atj-gen-jint integer) → expr
Arguments: integer — Guard (sbyte32p integer).
Returns: expr — Type (jexprp expr).

Definitions and Theorems

Function: atj-gen-jint

(defun atj-gen-jint (integer)
  (declare (xargs :guard (sbyte32p integer)))
  (let ((__function__ 'atj-gen-jint))
    (declare (ignorable __function__))
    (if (< integer 0)
        (jexpr-unary (junop-uminus)
                     (jexpr-lit-int-dec-nouscores (- integer)))
      (jexpr-lit-int-dec-nouscores integer))))

Theorem: jexprp-of-atj-gen-jint

(defthm jexprp-of-atj-gen-jint
  (b* ((expr (atj-gen-jint integer)))
    (jexprp expr))
  :rule-classes :rewrite)