summaryrefslogtreecommitdiff
path: root/trunk/Examples/test-suite/octave/li_cmalloc_runme.m
blob: 45faf7381c0f25b11d848efd706f0ddc62f83602 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
li_cmalloc

p = malloc_int();
free_int(p);

ok = 0;
try
    p = calloc_int(-1);
    free_int(p);
catch
    ok = 1;
end_try_catch

if (ok != 1)
    error
endif