diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2021-03-05 13:31:16 -0500 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2021-03-05 13:31:16 -0500 |
| commit | 03ada27cb81dabb87eff38f2d66fe8fc4a02da46 (patch) | |
| tree | ee81ebdcc796bc856f5abf485f7861e484b80927 /test/lisp/emacs-lisp/benchmark-tests.el | |
| parent | d582356a7f704f8a209a3ef31d6ea970520c6224 (diff) | |
| download | emacs-03ada27cb81dabb87eff38f2d66fe8fc4a02da46.tar.gz emacs-03ada27cb81dabb87eff38f2d66fe8fc4a02da46.tar.bz2 emacs-03ada27cb81dabb87eff38f2d66fe8fc4a02da46.zip | |
* lisp/emacs-lisp/bindat.el: Minor refactoring
(bindat--unpack-str, bindat--unpack-strz, bindat--unpack-bits):
New functions, extracted from `bindat--unpack-item`.
(bindat--unpack-item): Use them.
(bindat--align): New function.
(bindat--unpack-group, bindat--length-group, bindat--pack-group): Use it.
(bindat-get-field): Allow integers to index both lists (as returned by
`repeat`) and vectors (as returned by `vec`).
(bindat--pack-str, bindat--pack-bits): New functions, extracted from
`bindat--pack-item`.
(bindat--pack-item): Use them.
* test/lisp/emacs-lisp/bindat-tests.el (struct-bindat): Place the fields
in the order in which they appear in the structs.
Diffstat (limited to 'test/lisp/emacs-lisp/benchmark-tests.el')
0 files changed, 0 insertions, 0 deletions