tchrist@convex.com (Tom Christiansen) (02/13/90)
Version: perl 3.0, patchlevel 8 System: convex c220 Repeat-by: 0. snip the following code and run 'perl -d' on it. 1. type &x to the debugger and get longjump botch and SIGILL 2. type &y to the debugger and notice you get an (expected) error 3. prove to yourself you can call functions with &z --tom =============================== begin snip here ============================= sub x { printf "min = %6d mid = %6d $max = %6d (%d)\n", $min, $mid, $max, ($mid % $blksize); } sub y { local($x) = 0; $x = $blksize ? 0 : ($mid % $blksize); printf "min = %6d mid = %6d $max = %6d (%d)\n", $min, $mid, $max, $x; } sub z { print "hello world\n"; } 1; =============================== end snip here ============================== -- Tom Christiansen {uunet,uiucdcs,sun}!convex!tchrist Convex Computer Corporation tchrist@convex.COM "EMACS belongs in <sys/errno.h>: Editor too big!"