Mercurial > hg > octave-image

changeset 5:3ad01c0606eb

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
minor mod to add unwind_protect
author aadler
date Sun, 17 Mar 2002 02:36:12 +0000
parents cd11b4c8ce4c
children f048aaec1b2d
files impad.m
diffstat 1 files changed, 6 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/impad.m
+++ b/impad.m
@@ -57,6 +57,9 @@
 
 function retval = impad(A, xpad, ypad, ...)
 
+empty_list_elements_ok_save = empty_list_elements_ok;
+unwind_protect
+
 padding = "zeros";
 const = 1;
 va_start();
@@ -130,6 +133,8 @@
     error("Unknown padding type");
 endif
 
-empty_list_elements_ok = emptywarn;  
+unwind_protect_cleanup
+    empty_list_elements_ok = empty_list_elements_ok_save;
+end_unwind_protect
       
 endfunction