وسائط سطر الأوامر

// وسائط سطر الأوامر: الوسيطة 0 هي البرنامج نفسه.
استورد std.io.println;
استورد std.text.number;
استورد std.process.argument_count;
استورد std.process.argument;

عرف الرئيسية(): عدد {
    دع العدد: طبيعي = عدد_الوسائط();
    اطبع_سطر(طبيعي_إلى_نص(العدد));
    دع ف: متغير طبيعي = 1;
    طالما (ف < العدد) {
        طابق وسيطة(ف) مع
        | اختياري.موجود(النص) -> { اطبع_سطر(النص); }
        | اختياري.لا_شيء -> { };
        ف := ف + 1;
    }
    أرجع 0;
}

// Command-line arguments: argument 0 is the program itself.
import std.io.println;
import std.text.number;
import std.process.argument_count;
import std.process.argument;

def main(): int {
    let count: uint = argument_count();
    println(uint_to_text(count));
    let i: mutable uint = 1;
    while (i < count) {
        match argument(i) with
        | option.some(text) -> { println(text); }
        | option.none -> { };
        i := i + 1;
    }
    return 0;
}