Specialized form of defbyte for generating standard fixtypes of signed bytes of explicit integer sizes.
This macro just takes a positive integer as input.
This macro generates fixtypes called
This also generates some standardized XDOC parents and short, and no XDOC long.
Macro:
(defmacro defsbyte (size) (declare (xargs :guard (posp size))) (cons 'defbyte (cons (acl2::packn (list 'acl2::sbyte size)) (cons ':size (cons size (cons ':signed (cons 't (cons ':pred (cons (acl2::packn (list 'acl2::sbyte size 'p)) (cons ':fix (cons (acl2::packn (list 'acl2::sbyte size '-fix)) (cons ':equiv (cons (acl2::packn (list 'acl2::sbyte size '-equiv)) (cons ':parents (cons '(defbyte-standard-instances) (cons ':short (cons (concatenate 'string "Fixtype of signed bytes of size " (coerce (explode-nonnegative-integer size 10 nil) 'string) ".") 'nil)))))))))))))))))