:import "c_wrap_linux.tnsl" /; module utils :import "vector.tnsl" :import "file.tnsl" ;/ :import "compile/compile.tnsl" ~uint8 DEFAULT_FOUT = "out.asm\0" ~uint8 USAGE = " TNSLC v1.0.0 (C) 2024 CircleShift usage: tnslc (file in) [file out] \0" /; main (int argc, ~~uint8 argv) [int] asm "mov r10, rdi" asm "mov r11, rsi" /; if (argc < 2) _printf(USAGE) return 1 ;/ utils.File in, out in.init(argv{1}) /; if (argc < 3) out.init(argv{2}) ;; else out.init(DEFAULT_FOUT) ;/ compile.generate(in, out) return 0 ;/