diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2022-05-24 06:57:19 -0700 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2022-05-24 06:57:19 -0700 |
| commit | fd37633953e63ac317b3dfd663f5cb0659d0aceb (patch) | |
| tree | f9f0e048ac529e72fbeee6a37cfb2f885c5f3860 | |
| parent | 735a001aece9e7b7247561201e63c7efa93b3bee (diff) | |
| download | txr-fd37633953e63ac317b3dfd663f5cb0659d0aceb.tar.gz txr-fd37633953e63ac317b3dfd663f5cb0659d0aceb.tar.bz2 txr-fd37633953e63ac317b3dfd663f5cb0659d0aceb.zip | |
fixup! ffi: couple of tests; assertion.
| -rw-r--r-- | tests/017/bitfields.tl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/tests/017/bitfields.tl b/tests/017/bitfields.tl index dd0aab3c..5e8277f1 100644 --- a/tests/017/bitfields.tl +++ b/tests/017/bitfields.tl @@ -587,14 +587,14 @@ (conv-test #S(s13 x #x7f b0 #xff) #b'7fff0000') (typedef s14 (pack (struct s14 - (a (bit 9 le-uint32)) - (b (bit 7 le-uint32))))) + (a (bit 9 le-uint32)) + (b (bit 7 le-uint32))))) (conv-test #S(s14 a #x1ff b #x7f) #b'ffff') (typedef s15 (pack (struct s15 - (x uint8) - (a (bit 9 le-uint32)) - (b (bit 7 le-uint32))))) + (x uint8) + (a (bit 9 le-uint32)) + (b (bit 7 le-uint32))))) (conv-test #S(s15 x 0 a #x1ff b #x7f) #b'00ffff') |