UnixOperatingSystem.st
changeset 6960 f53bba609580
parent 6852 7e4ea7876711
child 6987 10a0dd0ac8c9
equal deleted inserted replaced
6959:e766340a8f5b 6960:f53bba609580
  8081     "return the hostname we are running on - if there is
  8081     "return the hostname we are running on - if there is
  8082      a HOST environment variable, we are much faster here ...
  8082      a HOST environment variable, we are much faster here ...
  8083      Notice:
  8083      Notice:
  8084         not all systems support this; on some, nil is returned."
  8084         not all systems support this; on some, nil is returned."
  8085 
  8085 
  8086 %{  /* STACK: 2048 */
  8086 %{  /* STACK: 100000 */
       
  8087 
       
  8088     /* sigh - with libc.so.6, gethostname needs huge amounts of stack
       
  8089      * actually this is linux specific, but should not hurt others
       
  8090      */
  8087 #if defined(HAS_GETHOSTNAME)
  8091 #if defined(HAS_GETHOSTNAME)
  8088     char buffer[256];
  8092     char buffer[256];
  8089 
  8093 
  8090     if (gethostname(buffer, sizeof(buffer)) == 0) {
  8094     if (gethostname(buffer, sizeof(buffer)) == 0) {
  8091         RETURN (__MKSTRING(buffer));
  8095         RETURN (__MKSTRING(buffer));
 10501 ! !
 10505 ! !
 10502 
 10506 
 10503 !UnixOperatingSystem::FilePointerHandle class methodsFor:'documentation'!
 10507 !UnixOperatingSystem::FilePointerHandle class methodsFor:'documentation'!
 10504 
 10508 
 10505 version
 10509 version
 10506     ^ '$Header: /cvs/stx/stx/libbasic/UnixOperatingSystem.st,v 1.133 2002-11-11 21:25:39 cg Exp $'
 10510     ^ '$Header: /cvs/stx/stx/libbasic/UnixOperatingSystem.st,v 1.134 2003-01-23 11:52:19 cg Exp $'
 10507 ! !
 10511 ! !
 10508 
 10512 
 10509 !UnixOperatingSystem::FilePointerHandle methodsFor:'release'!
 10513 !UnixOperatingSystem::FilePointerHandle methodsFor:'release'!
 10510 
 10514 
 10511 closeFile
 10515 closeFile
 12169 ! !
 12173 ! !
 12170 
 12174 
 12171 !UnixOperatingSystem class methodsFor:'documentation'!
 12175 !UnixOperatingSystem class methodsFor:'documentation'!
 12172 
 12176 
 12173 version
 12177 version
 12174     ^ '$Header: /cvs/stx/stx/libbasic/UnixOperatingSystem.st,v 1.133 2002-11-11 21:25:39 cg Exp $'
 12178     ^ '$Header: /cvs/stx/stx/libbasic/UnixOperatingSystem.st,v 1.134 2003-01-23 11:52:19 cg Exp $'
 12175 ! !
 12179 ! !
 12176 
 12180 
 12177 UnixOperatingSystem initialize!
 12181 UnixOperatingSystem initialize!
 12178 UnixOperatingSystem::FileDescriptorHandle initialize!
 12182 UnixOperatingSystem::FileDescriptorHandle initialize!