| IDL 5.0 no limit in execute? [message #10175] |
Wed, 08 October 1997 00:00 |
panther
Messages: 4
Registered: July 1996
|
Junior Member |
|
|
Hello,
some time ago someone said, that there is no limit, but look
at this:
panther@jungle:/home/panther/work > idl
IDL Version 5.0 (linux x86). Research Systems, Inc.
% Unable to open validation file: /usr/local/rsi/idl_5/idl.genver.
No such file or directory
% Machine not licensed for IDL. Entering 7 minute Demo mode.
This Demo mode is for short-term product evaluation purposes only.
For basic information, enter "IDLInfo" at the IDL> prompt.
IDL> .compile fail
% Compiled module: FAIL.
IDL> fail
Execute OK: 1
.... some lines deleted.....
Execute OK: 44
& END
^
% Program code area full.
Execute failed at 45
IDL>$cat fail.pro
pro fail
for te=1,105 do begin
anzahl=te
tname=strarr(anzahl)
for i=0,anzahl-1 do tname(i)='TN_'+strcompress(string(i),/remove_all)
ttyp=strarr(anzahl)
; zum ausuchen
ttyp(*)="'String-test'"
ttyp(*)="fltarr(10)"
ttyp(*)="dcomplexarr(102)"
ziel=byte(0)
estring='ziel={'
for i=0,anzahl-1 do begin
if i gt 0 then estring=estring+','
estring=estring+tname(i)+':'+ttyp(i)
endfor
estring=estring+'}'
if execute(estring) then begin
print,' Execute OK: ',te
endif else begin
goto,abbruch
endelse
endfor
abbruch:
print, ' Execute failed at ',te
end
--
Panther in the Jungle __..--''``\--....___ _..,_
-BELIEVE AND DECEIVE- _.-' .-/"; ` ``<._ ``-+'~=.
http://www.ang-physik _.-' _..--.'_ \ `(^) )
.uni-kiel.de/~hendrik ((..-' (< _ ;_..__ ; `'
|
|
|
|
comp.lang.idl-pvwave archive
Members
Search
Help
Login
Home
