snark13
4a081501d8
- bios/conio/env/errno/gfx/io/mem/mouse/stdio/stdlib/string/sys/time/ video разложены по модулям: общие статики и helpers — в internal _-модулях (_conio.h/_mouse.h/_gfx.h/_palette.h/_atexit.h/_time.h) - lib/Makefile: LIBC_C = wildcard libc/*/*.c — гранулярность файлов = гранулярность DCE линкера - эффект _CODE: gfx_text 6986→2568 Б, gfx_mous −1745, gfx_demo/d16 −542; ранее timedir −3270, ls −3098, stattest −2995 - комментарии оставшихся модулей переведены на русский; puts: убран мёртвый pchars; videomode_raw разложен на get/set - docs/libc-split-asm-cases.md — правила asm-связок между модулями; docs/libc-roadmap.md — план этапа - восстановлен examples/mdview/SAMPLE.MD (нужен make floppy) Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>
27 lines
655 B
C
27 lines
655 B
C
/*
|
|
* putenv — установить переменную окружения строкой "NAME=value" (ASCIIZ).
|
|
* ESTEX ENVIRON ($46, subfn 2): HL = строка; CF=1 / A = код при ошибке.
|
|
* Возвращает 0 или -1 + errno.
|
|
*/
|
|
|
|
#include <stdint.h>
|
|
#include <sprinter.h>
|
|
|
|
int putenv(const char *namevalue) __naked
|
|
{
|
|
(void)namevalue;
|
|
__asm
|
|
push ix
|
|
ld bc, #0x0246 ; ESTEX ENVIRON; subfn: setenv
|
|
rst #0x10
|
|
pop ix
|
|
jr c, _putenv_err
|
|
ld de, #0
|
|
ret
|
|
_putenv_err:
|
|
call __errno_set
|
|
ld de, #-1
|
|
ret
|
|
__endasm;
|
|
}
|