28 lines
845 B
Plaintext
28 lines
845 B
Plaintext
program main
|
|
fn main() -> i32
|
|
call std.io.eprint : unit
|
|
string "diagnostic" : string
|
|
local let arg_count : unit
|
|
call std.process.argc : i32
|
|
local let first_arg : unit
|
|
call std.process.arg : string
|
|
int 0 : i32
|
|
local let env_value : unit
|
|
call std.env.get : string
|
|
string "GLAGOL_EXP_3_ENV" : string
|
|
local let input : unit
|
|
call std.fs.read_text : string
|
|
string "glagol-exp-3-input.txt" : string
|
|
local let status : unit
|
|
call std.fs.write_text : i32
|
|
string "glagol-exp-3-output.txt" : string
|
|
var input : string
|
|
binary + : i32
|
|
var arg_count : i32
|
|
binary + : i32
|
|
var status : i32
|
|
call std.string.len : i32
|
|
call std.string.concat : string
|
|
var first_arg : string
|
|
var env_value : string
|