rocq/theories/CycleCode.v
The checked module nanofil -O makes of rocq/programs/cycle.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.
The module term.
TApp"module" TListTApp"func" TAtom"cycle"; TAtom"export"; TAtom"l"; TListTApp"param" TAtom"w"; TApp"tmp" TAtom"v0"; TListTApp"block" TAtom"start"; TList[ ]; TList[ ]; TApp"goto" TAtom"L4"; TApp"block" TAtom"L4"; TListTApp"phi" TApp"tmp" TAtom"pr.2"; TAtom"w"; TListTApp"-" TAtom"L5"; TApp"tmp" TAtom"v21"; TApp"-" TAtom"start"; TApp"const" TInt0; TApp"phi" TApp"tmp" TAtom"pr.1"; TAtom"l"; TListTApp"-" TAtom"L5"; TApp"tmp" TAtom"v19"; TApp"-" TAtom"start"; TApp"const" TInt0; TListTApp"let" TApp"tmp" TAtom"v10"; TAtom"w"; TApp"cmp" TAtom"slt"; TAtom"w"; TListTApp"tmp" TAtom"pr.2"; TApp"tmp" TAtom"v0"; TApp"branch" TApp"tmp" TAtom"v10"; TAtom"L5"; TAtom"L7"; TApp"block" TAtom"L5"; TList[ ]; TListTApp"let" TApp"tmp" TAtom"v12"; TAtom"p"; TAtom"copy"; TListTApp"global" TAtom"xs"; TApp"let" TApp"tmp" TAtom"v14"; TAtom"w"; TAtom"rem"; TListTApp"tmp" TAtom"pr.2"; TApp"const" TInt4; TApp"let" TApp"tmp" TAtom"v15"; TAtom"l"; TApp"ext" TAtom"sw"; TListTApp"tmp" TAtom"v14"; TApp"let" TApp"tmp" TAtom"v16"; TAtom"l"; TAtom"shl"; TListTApp"tmp" TAtom"v15"; TApp"const" TInt3; TApp"flight" TApp"tmp" TAtom"v17"; TAtom"add"; TListTApp"address" TApp"tmp" TAtom"v12"; TApp"tmp" TAtom"v16"; TApp"lower" TApp"tmp" TAtom"v12"; TApp"let" TApp"tmp" TAtom"chk0"; TAtom"a"; TApp"check" TInt0; TInt8; TAtom"read"; TInt1; TListTApp"tmp" TAtom"v17"; TApp"let" TApp"tmp" TAtom"v18"; TAtom"l"; TApp"raw_load" TAtom"l"; TInt0; TListTApp"tmp" TAtom"chk0"; TApp"let" TApp"tmp" TAtom"v19"; TAtom"l"; TAtom"add"; TListTApp"tmp" TAtom"pr.1"; TApp"tmp" TAtom"v18"; TApp"let" TApp"tmp" TAtom"v21"; TAtom"w"; TAtom"add"; TListTApp"tmp" TAtom"pr.2"; TApp"const" TInt1; TApp"goto" TApp"poll" TAtom"L4"; TApp"block" TAtom"L7"; TList[ ]; TList[ ]; TApp"ret" TApp"tmp" TAtom"pr.1"; TApp"data" TAtom"xs"; TApp"ro" TAtom"local"; TInt8; TListTApp"item" TAtom"b"; TApp"str" TListchr1; chr0; chr0; chr0; chr0; chr0; chr0; chr0; chr2; chr0; chr0; chr0; chr0; chr0; chr0; chr0; chr3; chr0; chr0; chr0; chr0; chr0; chr0; chr0; chr4; chr0; chr0; chr0; chr0; chr0; chr0; chr0