/[gcl]/gcl/o/main.c
ViewVC logotype

Diff of /gcl/o/main.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.8 by camm, Sun Jan 6 07:40:25 2002 UTC revision 1.8.2.1 by camm, Fri Jun 7 22:14:45 2002 UTC
# Line 83  object sSAmultiply_stacksA; Line 83  object sSAmultiply_stacksA;
83  int stack_multiple=1;  int stack_multiple=1;
84  static object stack_space;  static object stack_space;
85    
86    #ifdef _WIN32
87    unsigned int _dbegin = 0x10100000;
88    unsigned int _stacktop, _stackbottom;
89    #endif
90    
91  int cssize;  int cssize;
92    
# Line 103  int argc; Line 107  int argc;
107  char **argv, **envp;  char **argv, **envp;
108  {  {
109          FILE *i;          FILE *i;
110            unsigned int dummy;
111  #ifdef BSD  #ifdef BSD
112  #ifdef RLIMIT_STACK  #ifdef RLIMIT_STACK
113          struct rlimit rl;          struct rlimit rl;
# Line 121  char **argv, **envp; Line 126  char **argv, **envp;
126          RECREATE_HEAP          RECREATE_HEAP
127  #endif  #endif
128                    
129    #ifdef _WIN32
130            _stackbottom = (unsigned int ) &dummy;
131            _stacktop    = _stackbottom - 0x10000; // ???
132    #endif
133          setbuf(stdin, stdin_buf);          setbuf(stdin, stdin_buf);
134          setbuf(stdout, stdout_buf);          setbuf(stdout, stdout_buf);
135                    

Legend:
Removed from v.1.8  
changed lines
  Added in v.1.8.2.1

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26