dan
/
cl-pack
1
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

test buffer didn't save for last commit -_-; including updated tests for 0 repeat fix

This commit is contained in:
Dan Ballard 2018-04-13 23:45:26 -07:00
parent 8e68493603
commit 6c633925df
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
tests.lisp
View File

@ -117,7 +117,8 @@
(string= (pack "NX2" #x41424344) "AB") ;delete chars (string= (pack "NX2" #x41424344) "AB") ;delete chars
(string= (pack "c.c" 65 0 66 ) "B") ; truncate (string= (pack "c.c" 65 0 66 ) "B") ; truncate
(string= (pack "c.c" 65 2 66) (concatenate 'string "A" (string #\null) "B")) ; null pad (string= (pack "c.c" 65 2 66) (concatenate 'string "A" (string #\null) "B")) ; null pad
(string= (pack "c@0c" 65 66) "B") ;truncate (string= (pack "cc0c" 65 66 67) "AB") ; 0 repeat consumes nothing
(string= (pack "c@0c" 65 66) "AB") ;truncate
(string= (pack "c@2c" 65 66) (concatenate 'string "A" (string #\null) "B")) ; null pad (string= (pack "c@2c" 65 66) (concatenate 'string "A" (string #\null) "B")) ; null pad
)) ))