Mercurial > repos > public > sbplib
annotate assert_size.m @ 0:48b6fb693025
Initial commit.
| author | Jonatan Werpers <jonatan@werpers.com> |
|---|---|
| date | Thu, 17 Sep 2015 10:12:50 +0200 |
| parents | |
| children | afd20f023928 |
| rev | line source |
|---|---|
| 0 | 1 % Assert that array A has the size s. |
| 2 function assert_size(A,s) | |
| 3 errmsg = sprintf('Expected %s to have size %s, got: %s',inputname(1), format_vector(s), format_vector(size(A))); | |
| 4 assert(all(size(A) == s),errmsg); | |
| 5 end | |
| 6 | |
| 7 function str = format_vector(a) | |
| 8 l = length(a); | |
| 9 str = sprintf('[%d',a(1)); | |
| 10 | |
| 11 for i = 2:l | |
| 12 str = [str sprintf(', %d',a(i))]; | |
| 13 end | |
| 14 | |
| 15 str = [str ']']; | |
| 16 end |