bootstrap/cowlink-cgen.bootstrap.c
// ReadH2 workspace at ws+704 length ws+1
ReadH2 workspace at ws+704 length ws+1
ReadH2 workspace at ws + 704 length ws + 1
void f93(i1* p1847 ) {
	i8 v1848 = (i8)(intptr_t)(ws+674);
	i2 v1849 = *(i2*)(intptr_t)v1848;
	i2 v1850 = (i2)+2;
	if (v1849<v1850) goto c02_01b5; else goto c02_01b6;
c02_01b5:;
	f90();
	goto c02_01b2;
c02_01b6:;
c02_01b2:;
	i8 v1851 = (i8)(intptr_t)(ws+674);
	i2 v1852 = *(i2*)(intptr_t)v1851;
	i2 v1853 = v1852+(-2);
	i8 v1854 = (i8)(intptr_t)(ws+674);
	*(i2*)(intptr_t)v1854 = v1853;
	i8 v1855 = (i8)(intptr_t)(ws+648);
	i8 v1856 = *(i8*)(intptr_t)v1855;
	i1 v1857;
	f79(&v1857, v1856);
	i8 v1858 = (i8)(intptr_t)(ws+704);
	*(i1*)(intptr_t)v1858 = v1857;
endsub:;
	*p1847 = *(i1*)(intptr_t)(ws+704);
}
void f93 ( i1 * p1847 ) { i8 v1848 = ( i8 ) ( intptr_t ) ( ws + 674 ) ; i2 v1849 = * ( i2 * ) ( intptr_t ) v1848 ; i2 v1850 = ( i2 ) + 2 ; if ( v1849 < v1850 ) goto c02_01b5 ; else goto c02_01b6 ; c02_01b5 : ; f90 ( ) ; goto c02_01b2 ; c02_01b6 : ; c02_01b2 : ; i8 v1851 = ( i8 ) ( intptr_t ) ( ws + 674 ) ; i2 v1852 = * ( i2 * ) ( intptr_t ) v1851 ; i2 v1853 = v1852 + ( -2 ) ; i8 v1854 = ( i8 ) ( intptr_t ) ( ws + 674 ) ; * ( i2 * ) ( intptr_t ) v1854 = v1853 ; i8 v1855 = ( i8 ) ( intptr_t ) ( ws + 648 ) ; i8 v1856 = * ( i8 * ) ( intptr_t ) v1855 ; i1 v1857 ; f79 ( & v1857 , v1856 ) ; i8 v1858 = ( i8 ) ( intptr_t ) ( ws + 704 ) ; * ( i1 * ) ( intptr_t ) v1858 = v1857 ; endsub : ; * p1847 = * ( i1 * ) ( intptr_t ) ( ws + 704 ) ; }
ReadH2 workspace at ws+704 length ws+1
ReadH2 workspace at ws + 704 length ws + 1
/* result */