1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22
# do not dump Octave core if exist("crash_dumps_octave_core", "builtin") crash_dumps_octave_core(0); endif 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