Aryadev Chavali
29d2453288
Principle was that we may have read all the content from the underlying pipe (s.t. it set the EoF flag) but we haven't actually iterated the content.
46 lines
1.2 KiB
C
46 lines
1.2 KiB
C
/* Copyright (C) 2025 Aryadev Chavali
|
|
|
|
* This program is distributed in the hope that it will be useful, but WITHOUT
|
|
* ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
|
|
* FOR A PARTICULAR PURPOSE. See the Unlicense for details.
|
|
|
|
* You may distribute and modify this code under the terms of the Unlicense,
|
|
* which you should have received a copy of along with this program. If not,
|
|
* please go to <https://unlicense.org/>.
|
|
|
|
* Created: 2025-08-19
|
|
* Description: Entrypoint
|
|
*/
|
|
|
|
#include <malloc.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
|
|
#include "./alisp.h"
|
|
|
|
int main(void)
|
|
{
|
|
stream_t stream = {0};
|
|
const char data[] = "Hello, world!";
|
|
const sv_t sv = SV(data, ARRSIZE(data) - 1);
|
|
char filename[] = "test.txt";
|
|
|
|
// stream_init_string(&stream, NULL, sv);
|
|
|
|
// FILE *fp = fopen(filename, "rb");
|
|
// stream_init_file(&stream, filename, fp);
|
|
|
|
stream_init_file(&stream, "stdin", stdin);
|
|
|
|
printf("[debug]: setup stream pipe\n");
|
|
do
|
|
{
|
|
printf("%s[%lu]: `%c`\n", stream.name, stream.position,
|
|
stream_next(&stream));
|
|
} while (!stream_eoc(&stream));
|
|
printf("%lu/%lu\n", stream.position, stream_size(&stream));
|
|
stream_stop(&stream);
|
|
// fclose(fp);
|
|
return 0;
|
|
}
|