Run through clang-format before editing.

This commit is contained in:
David Given 2019-02-06 11:50:05 +01:00
parent 73fab341f5
commit b77f616598

View file

@ -14,27 +14,31 @@ static char rcsid[]= "$Id$" ;
#include <stdlib.h> /* atol */
void
con_part(sz,w) register sz; word w; {
void con_part(sz, w) register sz;
word w;
{
while (part_size % sz)
part_size++;
if (part_size == 2)
part_flush();
if (sz == 1) {
if (sz == 1)
{
w &= 0xFF;
if (part_size)
w <<= 8;
part_word |= w;
} else {
}
else
{
assert(sz == 2);
part_word = w;
}
part_size += sz;
}
void
con_mult(sz) word sz; {
void con_mult(sz) word sz;
{
if (argval != 4)
fatal("bad icon/ucon size");
@ -48,29 +52,35 @@ con_mult(sz) word sz; {
#define FL_MSB_AT_LOW_ADDRESS 0
#include <con_float>
void
prolog(nlocals) full nlocals; {
void prolog(nlocals) full nlocals;
{
fprintf(codefile, "\tpush\tb\n\tlxi\th,0\n\tdad\tsp\n\tmov\tb,h\n\tmov\tc,l\n");
switch (nlocals) {
case 4: fprintf(codefile,"\tpush\th\n");
case 2: fprintf(codefile,"\tpush\th\n");
case 0: break;
switch (nlocals)
{
case 4:
fprintf(codefile, "\tpush\th\n");
case 2:
fprintf(codefile, "\tpush\th\n");
case 0:
break;
default:
fprintf(codefile, "\tlxi\th,%d\n\tdad\tsp\n\tsphl\n", -nlocals);
break;
}
}
void
mes(type) word type ; {
void mes(type) word type;
{
int argt;
switch ( (int)type ) {
switch ((int)type)
{
case ms_ext:
for (;;) {
switch ( argt=getarg(
ptyp(sp_cend)|ptyp(sp_pnam)|sym_ptyp) ) {
for (;;)
{
switch (argt = getarg(ptyp(sp_cend) | ptyp(sp_pnam) | sym_ptyp))
{
case sp_cend:
return;
default:
@ -80,14 +90,10 @@ mes(type) word type ; {
}
}
default:
while ( getarg(any_ptyp) != sp_cend ) ;
while (getarg(any_ptyp) != sp_cend)
;
break;
}
}
char *segname[] = {
".sect .text",
".sect .data",
".sect .rom",
".sect .bss"
};
char* segname[] = { ".sect .text", ".sect .data", ".sect .rom", ".sect .bss" };