test: add big/little endian 16 bit tests

Test that the exported lisp functions behave as expected
when writing and reading big and little endian 16 bit values
to and from lone lisp bytes objects.

test/lone/lisp/modules/intrinsic/bytes/write-then-read/16/input

@@ -3,8 +3,12 @@
   (math /)
   (bytes
     new
-    read-u16 write-u16
-    read-s16 write-s16))
+    read-u16   write-u16
+    read-s16   write-s16
+    read-u16le write-u16le
+    read-s16le write-s16le
+    read-u16be write-u16be
+    read-s16be write-s16be))
 
 (set max-bits 16)
 (set memory (new (/ max-bits 8)))
@@ -16,3 +20,31 @@
 (print (write-s16 memory 0 -30000))
 (print (read-u16  memory 0))
 (print (read-s16  memory 0))
+
+(print (write-u16le memory 0 +60000))
+(print memory)
+(print (read-u16le memory 0))
+(print (read-s16le memory 0))
+(print (read-u16be memory 0))
+(print (read-s16be memory 0))
+
+(print (write-u16be memory 0 +60000))
+(print memory)
+(print (read-u16le memory 0))
+(print (read-s16le memory 0))
+(print (read-u16be memory 0))
+(print (read-s16be memory 0))
+
+(print (write-s16le memory 0 -30000))
+(print memory)
+(print (read-u16le memory 0))
+(print (read-s16le memory 0))
+(print (read-u16be memory 0))
+(print (read-s16be memory 0))
+
+(print (write-s16be memory 0 -30000))
+(print memory)
+(print (read-u16le memory 0))
+(print (read-s16le memory 0))
+(print (read-u16be memory 0))
+(print (read-s16be memory 0))

test/lone/lisp/modules/intrinsic/bytes/write-then-read/16/output

@@ -4,3 +4,27 @@
 -30000
 35536
 -30000
+60000
+bytes[0x60EA]
+60000
+-5536
+24810
+24810
+60000
+bytes[0xEA60]
+24810
+24810
+60000
+-5536
+-30000
+bytes[0xD08A]
+35536
+-30000
+53386
+-12150
+-30000
+bytes[0x8AD0]
+53386
+-12150
+35536
+-30000