Raymond Toy pushed to branch master at cmucl / cmucl

Commits:

2 changed files:

Changes:

  • src/code/unix.lisp
    ... ... @@ -2726,6 +2726,14 @@
    2726 2726
         (domainname (array char 65))))
    
    2727 2727
     
    
    2728 2728
     (defun unix-uname ()
    
    2729
    +  _N"Unix-uname returns information from the uname(2) system call.
    
    2730
    +  The return values are
    
    2731
    +
    
    2732
    +    Name of the operating system
    
    2733
    +    Name of this node within some implementation-defined network, if any
    
    2734
    +    Release level of this operating system
    
    2735
    +    Version level of this operating system release
    
    2736
    +    Name of the hardware type on which the system is running"
    
    2729 2737
       (with-alien ((names (struct utsname)))
    
    2730 2738
         (syscall* (#-(or freebsd (and x86 solaris)) "uname"
    
    2731 2739
     	       #+(and x86 solaris) "nuname"	; See /usr/include/sys/utsname.h
    

  • src/i18n/locale/cmucl-unix.pot
    ... ... @@ -1365,6 +1365,18 @@ msgid ""
    1365 1365
     "   and its children."
    
    1366 1366
     msgstr ""
    
    1367 1367
     
    
    1368
    +#: src/code/unix.lisp
    
    1369
    +msgid ""
    
    1370
    +"Unix-uname returns information from the uname(2) system call.\n"
    
    1371
    +"  The return values are\n"
    
    1372
    +"\n"
    
    1373
    +"    Name of the operating system\n"
    
    1374
    +"    Name of this node within some implementation-defined network, if any\n"
    
    1375
    +"    Release level of this operating system\n"
    
    1376
    +"    Version level of this operating system release\n"
    
    1377
    +"    Name of the hardware type on which the system is running"
    
    1378
    +msgstr ""
    
    1379
    +
    
    1368 1380
     #: src/code/unix.lisp
    
    1369 1381
     msgid ""
    
    1370 1382
     "Get the value of the environment variable named Name.  If no such\n"