Fil-C on Nix

Filnix wiki

the formal campaign

rocq/theories/BufferCode.v

The checked module nanofil -O makes of rocq/programs/buffer.c, as a term. Generated by rocq/gallina.pl; rocq/programs.sh checks it is current. Do not edit.

From Stdlib Require Import String ZArith List Ascii
From Nanofil Require Import Term
Import ListNotations
Open Scope string_scope
Open Scope Z_scope

The one-character atom with code n.

12Definition chrn : nat : term ≔
TAtomStringascii_of_natn EmptyString

The module term.

15Definition buffer_term: term ≔
TApp"module" TListTApp"func" TAtom"buffer"; TAtom"export"; TAtom"l"; TListTApp"param" TAtom"w"; TApp"tmp" TAtom"v0"; TListTApp"block" TAtom"start"; TList[ ]; TListTApp"let" TApp"tmp" TAtom"v4"; TAtom"p"; TApp"alloc" TInt16; TListTApp"const" TInt32; TApp"goto" TAtom"L6"; TApp"block" TAtom"L6"; TListTApp"phi" TApp"tmp" TAtom"pr.1"; TAtom"w"; TListTApp"-" TAtom"start"; TApp"const" TInt0; TApp"-" TAtom"L7"; TApp"tmp" TAtom"v18"; TListTApp"let" TApp"tmp" TAtom"v11"; TAtom"w"; TApp"cmp" TAtom"slt"; TAtom"w"; TListTApp"tmp" TAtom"pr.1"; TApp"const" TInt4; TApp"branch" TApp"tmp" TAtom"v11"; TAtom"L7"; TAtom"L24"; TApp"block" TAtom"L7"; TList[ ]; TListTApp"let" TApp"tmp" TAtom"v14"; TAtom"l"; TApp"ext" TAtom"sw"; TListTApp"tmp" TAtom"pr.1"; TApp"let" TApp"tmp" TAtom"v15"; TAtom"l"; TAtom"shl"; TListTApp"tmp" TAtom"v14"; TApp"const" TInt3; TApp"flight" TApp"tmp" TAtom"v16"; TAtom"add"; TListTApp"address" TApp"tmp" TAtom"v4"; TApp"tmp" TAtom"v15"; TApp"lower" TApp"tmp" TAtom"v4"; TApp"let" TApp"tmp" TAtom"v18"; TAtom"w"; TAtom"add"; TListTApp"tmp" TAtom"pr.1"; TApp"const" TInt1; TApp"let" TApp"tmp" TAtom"v19"; TAtom"l"; TApp"ext" TAtom"sw"; TListTApp"tmp" TAtom"v18"; TApp"let" TApp"tmp" TAtom"chk0"; TAtom"a"; TApp"check" TInt0; TInt8; TAtom"write"; TInt1; TListTApp"tmp" TAtom"v16"; TApp"raw_store" TAtom"l"; TInt0; TApp"tmp" TAtom"v19"; TApp"tmp" TAtom"chk0"; TApp"goto" TApp"poll" TAtom"L6"; TApp"block" TAtom"L24"; TListTApp"phi" TApp"tmp" TAtom"pr.3"; TAtom"w"; TListTApp"-" TAtom"L25"; TApp"tmp" TAtom"v41"; TApp"-" TAtom"L6"; TApp"const" TInt0; TApp"phi" TApp"tmp" TAtom"pr.2"; TAtom"l"; TListTApp"-" TAtom"L25"; TApp"tmp" TAtom"v39"; TApp"-" TAtom"L6"; TApp"const" TInt0; TListTApp"let" TApp"tmp" TAtom"v30"; TAtom"w"; TApp"cmp" TAtom"slt"; TAtom"w"; TListTApp"tmp" TAtom"pr.3"; TApp"tmp" TAtom"v0"; TApp"branch" TApp"tmp" TAtom"v30"; TAtom"L25"; TAtom"L27"; TApp"block" TAtom"L25"; TList[ ]; TListTApp"let" TApp"tmp" TAtom"v34"; TAtom"w"; TAtom"rem"; TListTApp"tmp" TAtom"pr.3"; TApp"const" TInt4; TApp"let" TApp"tmp" TAtom"v35"; TAtom"l"; TApp"ext" TAtom"sw"; TListTApp"tmp" TAtom"v34"; TApp"let" TApp"tmp" TAtom"v36"; TAtom"l"; TAtom"shl"; TListTApp"tmp" TAtom"v35"; TApp"const" TInt3; TApp"flight" TApp"tmp" TAtom"v37"; TAtom"add"; TListTApp"address" TApp"tmp" TAtom"v4"; TApp"tmp" TAtom"v36"; TApp"lower" TApp"tmp" TAtom"v4"; TApp"let" TApp"tmp" TAtom"chk1"; TAtom"a"; TApp"check" TInt0; TInt8; TAtom"read"; TInt1; TListTApp"tmp" TAtom"v37"; TApp"let" TApp"tmp" TAtom"v38"; TAtom"l"; TApp"raw_load" TAtom"l"; TInt0; TListTApp"tmp" TAtom"chk1"; TApp"let" TApp"tmp" TAtom"v39"; TAtom"l"; TAtom"add"; TListTApp"tmp" TAtom"pr.2"; TApp"tmp" TAtom"v38"; TApp"let" TApp"tmp" TAtom"v41"; TAtom"w"; TAtom"add"; TListTApp"tmp" TAtom"pr.3"; TApp"const" TInt1; TApp"goto" TApp"poll" TAtom"L24"; TApp"block" TAtom"L27"; TList[ ]; TList[ ]; TApp"ret" TApp"tmp" TAtom"pr.2"