From 3503755c31a5ab6054d7d27fec9e178c5b6f2be0 Mon Sep 17 00:00:00 2001 From: kdx Date: Fri, 20 Jan 2023 14:11:10 +0100 Subject: test -> test.golem --- Makefile | 2 +- test | 53 ----------------------------------------------------- test.golem | 53 +++++++++++++++++++++++++++++++++++++++++++++++++++++ 3 files changed, 54 insertions(+), 54 deletions(-) delete mode 100644 test create mode 100644 test.golem diff --git a/Makefile b/Makefile index 3f50dee..557b4cb 100644 --- a/Makefile +++ b/Makefile @@ -22,7 +22,7 @@ clean: run: $(NAME) @printf '[run]\n' - @./$(NAME) test + @./$(NAME) test.golem re: @printf '[re]\n' diff --git a/test b/test deleted file mode 100644 index 8bb015a..0000000 --- a/test +++ /dev/null @@ -1,53 +0,0 @@ -fn strlen(s); - -// typeless language -// (i know, this stupid but me bad) - -const usage_str = "usage: %s \n"; - -fn main(argc, argv) { - var i; - var fp, data; - var toks; - - if argc != 2 { - fprintf(stderr, usage_str, argv[0]); - return 1; - } - i = 0; - while i < argc { - puts(argv[i]); - } - fp = fopen(argv[1], "rb"); - if fp == null { - perror("main"); - return 1; - } - data = drain(fp); - fclose(fp); - if data == 0 { - fprintf(stderr, "failed to drain '%s'\n", argv[1]); - return 1; - } - toks = lexer(data); - free(data); - if toks == 0 { - fprintf(stderr, "lexer failed\n"); - return 1; - } - lexer_print(toks); - lexer_free(toks); - return 0; -} - -fn strlen(s) { - var i, len; - - i = 0; - while s[i] { - len = len + ((s[i] & 0xFF) != 0); - len = len + ((s[i] & 0xFF00) != 0); - i += 1; - } - return len; -} diff --git a/test.golem b/test.golem new file mode 100644 index 0000000..8bb015a --- /dev/null +++ b/test.golem @@ -0,0 +1,53 @@ +fn strlen(s); + +// typeless language +// (i know, this stupid but me bad) + +const usage_str = "usage: %s \n"; + +fn main(argc, argv) { + var i; + var fp, data; + var toks; + + if argc != 2 { + fprintf(stderr, usage_str, argv[0]); + return 1; + } + i = 0; + while i < argc { + puts(argv[i]); + } + fp = fopen(argv[1], "rb"); + if fp == null { + perror("main"); + return 1; + } + data = drain(fp); + fclose(fp); + if data == 0 { + fprintf(stderr, "failed to drain '%s'\n", argv[1]); + return 1; + } + toks = lexer(data); + free(data); + if toks == 0 { + fprintf(stderr, "lexer failed\n"); + return 1; + } + lexer_print(toks); + lexer_free(toks); + return 0; +} + +fn strlen(s) { + var i, len; + + i = 0; + while s[i] { + len = len + ((s[i] & 0xFF) != 0); + len = len + ((s[i] & 0xFF00) != 0); + i += 1; + } + return len; +} -- cgit v1.2.3