~ubuntu-branches/ubuntu/hoary/scilab/hoary

« back to all changes in this revision

Viewing changes to routines/stack.h.in

  • Committer: Bazaar Package Importer
  • Author(s): Torsten Werner
  • Date: 2005-01-09 22:58:21 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20050109225821-473xr8vhgugxxx5j
Tags: 3.0-12
changed configure.in to build scilab's own malloc.o, closes: #255869

Show diffs side-by-side

added added

removed removed

Lines of Context:
22
22
c @FC_USE_CDEC@$ ENDIF
23
23
C     ---------------------------------------------------------------
24
24
      integer   csiz,bsiz,isizt,psiz,nsiz,lsiz
25
 
      parameter (csiz=63,bsiz=4096,isizt=2048,psiz=256,nsiz=6)
26
 
      parameter (lsiz=16384)
 
25
      parameter (csiz=63,bsiz=4096,isizt=10000,psiz=4096,nsiz=6)
 
26
      parameter (lsiz=65536)
27
27
      integer   nlgh,vsiz
28
28
      parameter (nlgh=nsiz*4,vsiz=2)
29
29
      integer   maxdb,maxbpt
30
 
      parameter (maxdb=20,maxbpt=100)
 
30
      parameter (maxdb=100,maxbpt=1000)
31
31
      integer intersiz
32
 
      parameter (intersiz=60)
 
32
      parameter (intersiz=1024)
33
33
c
34
34
      double precision stk(vsiz)
35
35
      common /stack/ stk
42
42
      character cstk*(4*vsiz)
43
43
      equivalence (cstk,stk(1))
44
44
 
 
45
      complex*16 zstk(vsiz/2)
 
46
      equivalence (zstk(1),stk(1))
 
47
 
45
48
      integer bot,top,idstk(nsiz,isizt),lstk(isizt),leps,bbot,bot0,isiz
46
49
      integer gbot,gtop,infstk(isizt)
47
50
      common /vstk/ bot,top,idstk,lstk,leps,bbot,bot0,infstk,
48
51
     $     gbot,gtop,isiz
49
52
 
50
53
      integer ids(nsiz,psiz),pstk(psiz),rstk(psiz),pt,niv,macr,paus
51
 
      integer icall
52
 
      common /recu/ ids,pstk,rstk,pt,niv,macr,paus,icall
 
54
      integer icall,krec
 
55
      common /recu/ ids,pstk,rstk,pt,niv,macr,paus,icall,krec
53
56
 
54
57
      integer ddt,err,lct(8),lin(lsiz),lpt(6),hio,rio,wio,rte,wte
55
58
      common /iop/ ddt,err,lct,lin,lpt,hio,rio,wio,rte,wte