| 1 |
39 |
lampret |
; @(#)getenv.s 1.4 90/10/14 21:57:45, AMD
|
| 2 |
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
| 3 |
|
|
; Copyright 1990 Advanced Micro Devices, Inc.
|
| 4 |
|
|
;
|
| 5 |
|
|
; This software is the property of Advanced Micro Devices, Inc (AMD) which
|
| 6 |
|
|
; specifically grants the user the right to modify, use and distribute this
|
| 7 |
|
|
; software provided this notice is not removed or altered. All other rights
|
| 8 |
|
|
; are reserved by AMD.
|
| 9 |
|
|
;
|
| 10 |
|
|
; AMD MAKES NO WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, WITH REGARD TO THIS
|
| 11 |
|
|
; SOFTWARE. IN NO EVENT SHALL AMD BE LIABLE FOR INCIDENTAL OR CONSEQUENTIAL
|
| 12 |
|
|
; DAMAGES IN CONNECTION WITH OR ARISING FROM THE FURNISHING, PERFORMANCE, OR
|
| 13 |
|
|
; USE OF THIS SOFTWARE.
|
| 14 |
|
|
;
|
| 15 |
|
|
; So that all may benefit from your experience, please report any problems
|
| 16 |
|
|
; or suggestions about this software to the 29K Technical Support Center at
|
| 17 |
|
|
; 800-29-29-AMD (800-292-9263) in the USA, or 0800-89-1131 in the UK, or
|
| 18 |
|
|
; 0031-11-1129 in Japan, toll free. The direct dial number is 512-462-4118.
|
| 19 |
|
|
;
|
| 20 |
|
|
; Advanced Micro Devices, Inc.
|
| 21 |
|
|
; 29K Support Products
|
| 22 |
|
|
; Mail Stop 573
|
| 23 |
|
|
; 5900 E. Ben White Blvd.
|
| 24 |
|
|
; Austin, TX 78741
|
| 25 |
|
|
; 800-292-9263
|
| 26 |
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
| 27 |
|
|
; getenv.s
|
| 28 |
|
|
; char *value = getenv( const char *name );
|
| 29 |
|
|
;
|
| 30 |
|
|
.file "getenv.s"
|
| 31 |
|
|
|
| 32 |
|
|
.include "sys/sysmac.h"
|
| 33 |
|
|
|
| 34 |
|
|
.text
|
| 35 |
|
|
.word 0x00030000 ; Debugger tag word
|
| 36 |
|
|
.global _getenv
|
| 37 |
|
|
.global __getenv
|
| 38 |
|
|
_getenv:
|
| 39 |
|
|
__getenv:
|
| 40 |
|
|
const tav,HIF_getenv @ asneq V_SYSCALL,gr1,gr1 ; HIF service trap
|
| 41 |
|
|
jmpti tav, lr0 ; If tav is true, were finished, return.
|
| 42 |
|
|
const tpc, _errno
|
| 43 |
|
|
consth tpc, _errno ; Otherwise,
|
| 44 |
|
|
store 0, 0, tav, tpc ; store error code in _errno,
|
| 45 |
|
|
jmpi lr0 ; then return
|
| 46 |
|
|
const v0, 0 ; with a value of 0 (NULL pointer).
|
| 47 |
|
|
|
| 48 |
|
|
.end
|
