Index: emacs/lisp/emacs-lisp/bindat.el diff -c emacs/lisp/emacs-lisp/bindat.el:1.4 emacs/lisp/emacs-lisp/bindat.el:1.5 *** emacs/lisp/emacs-lisp/bindat.el:1.4 Mon Sep 1 15:45:19 2003 --- emacs/lisp/emacs-lisp/bindat.el Sat Jun 11 23:56:33 2005 *************** *** 85,91 **** ;; (items u8) ;; (fill 3) ;; (item repeat (items) ! ;; ((struct data-spec))))) ;; ;; ;; A binary data representation may look like --- 85,91 ---- ;; (items u8) ;; (fill 3) ;; (item repeat (items) ! ;; (struct data-spec)))) ;; ;; ;; A binary data representation may look like *************** *** 131,137 **** ;; | ( [FIELD] align LEN ) -- skip to next multiple of LEN bytes ;; | ( [FIELD] struct SPEC_NAME ) ;; | ( [FIELD] union TAG_VAL (TAG SPEC)... [(t SPEC)] ) ! ;; | ( [FIELD] repeat COUNT SPEC ) ;; -- In (eval EXPR), the value of the last field is available in ;; the dynamically bound variable `last'. --- 131,137 ---- ;; | ( [FIELD] align LEN ) -- skip to next multiple of LEN bytes ;; | ( [FIELD] struct SPEC_NAME ) ;; | ( [FIELD] union TAG_VAL (TAG SPEC)... [(t SPEC)] ) ! ;; | ( [FIELD] repeat COUNT ITEM... ) ;; -- In (eval EXPR), the value of the last field is available in ;; the dynamically bound variable `last'. *************** *** 151,157 **** ;; -- Note: 32 bit values may be limited by emacs' INTEGER ;; implementation limits. ;; ! ;; -- Example: bits 2 will map bytes 0x1c 0x28 to list (2 3 7 11 13) ;; FIELD ::= ( eval EXPR ) -- use result as NAME ;; | NAME --- 151,158 ---- ;; -- Note: 32 bit values may be limited by emacs' INTEGER ;; implementation limits. ;; ! ;; -- Example: `bits 2' will unpack 0x28 0x1c to (2 3 4 11 13) ! ;; and 0x1c 0x28 to (3 5 10 11 12). ;; FIELD ::= ( eval EXPR ) -- use result as NAME ;; | NAME
_______________________________________________ Emacs-diffs mailing list [email protected] http://lists.gnu.org/mailman/listinfo/emacs-diffs
