استورد أساسي::سي.
غير_آمن خارجي املأ(هدف: سي::مخزن, بايت: ص32, عدد: ط64) -> مؤشر_سي
    = سي("libc.so.6", "memset", إخراج(هدف, عدد)).
دالة ابدأ_الرئيسية() -> ص64 {
    متغير مصدر: قائمة<ط8> = [0, 255, 65].
    دع منشأ = سي::أنشئ_مخزن(مصدر).
    إذا ليس منشأ::نجاح { اطبع(منشأ::الخطأ::الرمز). أرجع 1. }
    دع مملوك = منشأ::قيمة.
    دع مرادف = مملوك.
    مصدر[0] = 7.
    دع منسوخ = سي::انسخ_بايتات(مملوك, ط64(3)).
    إذا ليس منسوخ::نجاح { أرجع 2. }
    غير_آمن املأ(مملوك, ص32(32), ط64(3)).
    دع معدل = سي::انسخ_بايتات(مرادف, ط64(3))::قيمة.
    إذا منسوخ::قيمة[0] ليس يطابق 0 أو منسوخ::قيمة[1] ليس يطابق 255 أو منسوخ::قيمة[2] ليس يطابق 65 { أرجع 3. }
    إذا معدل[0] ليس يطابق 32 أو معدل[1] ليس يطابق 32 أو معدل[2] ليس يطابق 32 { أرجع 4. }
    دع متجاوز_الحجم = سي::انسخ_بايتات(مملوك, ط64(4)).
    إذا متجاوز_الحجم::نجاح أو متجاوز_الحجم::الخطأ::الرمز ليس يطابق "foreign.invalid_argument" { أرجع 5. }
    إذا ليس سي::أغلق(مملوك)::نجاح { أرجع 6. }
    دع مغلق = سي::سعة(مرادف).
    إذا مغلق::نجاح أو مغلق::الخطأ::الرمز ليس يطابق "foreign.closed" { أرجع 7. }
    إذا ليس سي::أغلق(مرادف)::نجاح { أرجع 8. }
    أرجع 0.
}