mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-10-06 11:32:29 +00:00
Code Issues 1 Releases Wiki Activity

added MARSH_EOS check

Browse Source
This commit is contained in:
J.-F. Cap
2019-02-24 18:45:14 +01:00
parent 8e0d7f2539
commit 0eae75a5c2
2 changed files with 16 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
examples/tarray.janet
View File

@@ -72,3 +72,15 @@
(printf "properties:\n%p" (tarray/properties (A :array)))
(printf "row properties:\n%p" (tarray/properties (matrix/row A 1)))
# test marshalling
(def a (tarray/new :float64 20))
(set (a 0) math/pi)
(set (a 1) 1234)
(def b (unmarshal (marshal a)))
(printf "%p" (tarray/properties b))
(print (b 0))
(print (b 1))