From 5d9a1ab17baa4e6f1b0543d92e849c06a56ccf59 Mon Sep 17 00:00:00 2001 From: A404M Date: Wed, 16 Apr 2025 10:39:34 +0330 Subject: add better array type system --- code/main.felan | 71 +++------------------------------------------------------ 1 file changed, 3 insertions(+), 68 deletions(-) (limited to 'code') diff --git a/code/main.felan b/code/main.felan index 23c774b..470479f 100644 --- a/code/main.felan +++ b/code/main.felan @@ -5,76 +5,11 @@ main :: () -> void { putc a[i]; i += 1; } + print(a); }; -print :: (value:[10]u8)->void{ - println(23); -}; - -println :: ()->void{ - putc '\n'; -}; - -println :: (value:i64)->void{ - print(value); - putc '\n'; -}; - -println :: (value:u64)->void{ - print(value); - putc '\n'; -}; - -println :: (value:bool)->void{ - print(value); - putc '\n'; -}; - -print :: (value:i64)->void{ - value := value; - a : [20]u8 = undefined; +print :: (value:[]u8)->void{ i := 0; - while { - a[i] = '0' + @cast(value % 10,u8); - i += 1; - value /= 10; - value != 0; - } {} - - while i > 0 { - putc a[i-1]; - i -= 1; - } -}; - -print :: (value:u64)->void{ - value := value; - a : [20]u8 = undefined; - i := 0; - while { - a[i] = '0' + @cast(value % 10,u8); - i += 1; - value /= 10; - value != 0; - } {} - - while i > 0 { - putc a[i-1]; - i -= 1; - } + putc 'h'; }; -print :: (value:bool)->void{ - if value { - putc 't'; - putc 'r'; - putc 'u'; - putc 'e'; - }else{ - putc 'f'; - putc 'a'; - putc 'l'; - putc 's'; - putc 'e'; - } -}; -- cgit v1.2.3