[comp.lang.perl] perl malloc on a Sun

poage@sunny.ucdavis.edu (Tom Poage) (12/08/90)

Can't say I've used the perl debugger before, but when used
with perl's malloc on a Sun 3 (SunOS 4.0.3, gcc 1.37.1) I
get "Out of memory!".  When used without perl's malloc, it
seems to run OK.

A printf in util.c:safemalloc() says that it tried to
get 1006632864 bytes.  The stack looks something like:

	_safemalloc()
	_afake()
	_do_subr()
	_eval()
	_cmd_exec()
	_main()

BTW, regarding my previous posting about @* in formats, I found
an acceptable fix (to me, at least).  However, @* now prints
a terminal newline as do other format constructs.

*** toke.c.saveorig	Fri Dec  7 18:51:34 1990
--- toke.c	Fri Dec  7 18:51:52 1990
***************
*** 2398,2404 ****
  	    switch (*s) {
  	    case '*':
  		fcmd->f_type = F_LINES;
! 		*s = '\0';
  		break;
  	    case '<':
  		fcmd->f_type = F_LEFT;
--- 2398,2404 ----
  	    switch (*s) {
  	    case '*':
  		fcmd->f_type = F_LINES;
! 		s++;
  		break;
  	    case '<':
  		fcmd->f_type = F_LEFT;
-- 
Tom Poage, Clinical Engineering
Universiy of California, Davis, Medical Center, Sacramento, CA
poage@sunny.ucdavis.edu  {...,ucbvax,uunet}!ucdavis!sunny!poage