bootstrap/cowlink-cgen.bootstrap.c
// ReadH4 workspace at ws+704 length ws+2
ReadH4 workspace at ws+704 length ws+2
ReadH4 workspace at ws + 704 length ws + 2
void f94(i2* p1859 ) {
	i8 v1860 = (i8)(intptr_t)(ws+674);
	i2 v1861 = *(i2*)(intptr_t)v1860;
	i2 v1862 = (i2)+4;
	if (v1861<v1862) goto c02_01ba; else goto c02_01bb;
c02_01ba:;
	f90();
	goto c02_01b7;
c02_01bb:;
c02_01b7:;
	i8 v1863 = (i8)(intptr_t)(ws+674);
	i2 v1864 = *(i2*)(intptr_t)v1863;
	i2 v1865 = v1864+(-4);
	i8 v1866 = (i8)(intptr_t)(ws+674);
	*(i2*)(intptr_t)v1866 = v1865;
	i8 v1867 = (i8)(intptr_t)(ws+648);
	i8 v1868 = *(i8*)(intptr_t)v1867;
	i2 v1869;
	f80(&v1869, v1868);
	i8 v1870 = (i8)(intptr_t)(ws+704);
	*(i2*)(intptr_t)v1870 = v1869;
endsub:;
	*p1859 = *(i2*)(intptr_t)(ws+704);
}
void f94 ( i2 * p1859 ) { i8 v1860 = ( i8 ) ( intptr_t ) ( ws + 674 ) ; i2 v1861 = * ( i2 * ) ( intptr_t ) v1860 ; i2 v1862 = ( i2 ) + 4 ; if ( v1861 < v1862 ) goto c02_01ba ; else goto c02_01bb ; c02_01ba : ; f90 ( ) ; goto c02_01b7 ; c02_01bb : ; c02_01b7 : ; i8 v1863 = ( i8 ) ( intptr_t ) ( ws + 674 ) ; i2 v1864 = * ( i2 * ) ( intptr_t ) v1863 ; i2 v1865 = v1864 + ( -4 ) ; i8 v1866 = ( i8 ) ( intptr_t ) ( ws + 674 ) ; * ( i2 * ) ( intptr_t ) v1866 = v1865 ; i8 v1867 = ( i8 ) ( intptr_t ) ( ws + 648 ) ; i8 v1868 = * ( i8 * ) ( intptr_t ) v1867 ; i2 v1869 ; f80 ( & v1869 , v1868 ) ; i8 v1870 = ( i8 ) ( intptr_t ) ( ws + 704 ) ; * ( i2 * ) ( intptr_t ) v1870 = v1869 ; endsub : ; * p1859 = * ( i2 * ) ( intptr_t ) ( ws + 704 ) ; }
ReadH4 workspace at ws+704 length ws+2
ReadH4 workspace at ws + 704 length ws + 2
/* result */