procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* lisp/emacs-lisp/bindat.el: Tweak example in comment

Browse source 
Suggested by Kim Storm <storm@cua.dk>.
This commit is contained in:
Stefan Monnier 2021-02-18 11:15:13 -05:00
parent de15ca7d00
commit 5977de581c
1 changed files with 9 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

18
lisp/emacs-lisp/bindat.el
View file

@ -41,23 +41,23 @@
;; Consider the following C structures:
;;
;; struct header {
;; unsigned long dest_ip;
;; unsigned long src_ip;
;; unsigned short dest_port;
;; unsigned short src_port;
;; uint32_t dest_ip;
;; uint32_t src_ip;
;; uint16_t dest_port;
;; uint16_t src_port;
;; };
;;
;; struct data {
;; unsigned char type;
;; unsigned char opcode;
;; unsigned long length; /* In little endian order */
;; uint8_t type;
;; uint8_t opcode;
;; uint32_t length; /* In little endian order */
;; unsigned char id[8]; /* nul-terminated string */
;; unsigned char data[/* (length + 3) & ~3 */];
;; };
;;
;; struct packet {
;; struct header header;
;; unsigned char items;
;; uint8_t items;
;; unsigned char filler[3];
;; struct data item[/* items */];
;; };
@ -75,7 +75,7 @@
;; (bindat-spec
;; (type u8)
;; (opcode u8)
;; (length u16r) ;; little endian order
;; (length u32r) ;; little endian order
;; (id strz 8)
;; (data vec (length))
;; (align 4)))