crunch@well.UUCP (John Draper) (11/30/86)
/*========================================================================= dispgad.c - A debugging routine that displays a gadget structure =========================================================================*/ /* The usual header files to be inserted later */ #include <intuition/intuition.h> #include <libraries/dosextens.h> #include <graphics/gfxbase.h> #include <graphics/gfx.h> #include <graphics/display.h> #include <exec/memory.h> #include <workbench/workbench.h> #include <workbench/startup.h> #include <devices/narrator.h> #include <devices/audio.h> #include <libraries/translator.h> #include <stdio.h> #include "gad.h" /* constants */ /* external functions */ dispgad(gad) struct Gadget *gad; /* Pointer to gadget to be displayed */ { kprintf("NextGadget = %lx\n", gad->NextGadget); kprintf("LeftEdge = %d, TopEdge = %d\n", gad->LeftEdge, gad->TopEdge); kprintf("Width = %d, Height = %d\n", gad->Width, gad->Height); kprintf("Flags = %x\n", gad->Flags); kprintf("Activation = %x\n", gad->Activation); kprintf("GadgetType = %d\n", gad->GadgetType); kprintf("GadgetRender = %lx\n", gad->GadgetRender); kprintf("SelectRender = %lx\n", gad->SelectRender); kprintf("GadgetText = %lx\n", gad->GadgetText); kprintf("MutualExclude = %lx\n", gad->MutualExclude); kprintf("SpecialInfo = %lx\n", gad->SpecialInfo); kprintf("GadgetID = %d\n", gad->GadgetID); kprintf("UserData = %lx\n", gad->UserData); kprintf("\n"); } dispbord(bord) struct Border *bord; /* Border to be printed */ { kprintf("LeftEdge = %d TopEdge = %d\n", bord->LeftEdge, bord->TopEdge); kprintf("FrontPen = %d BackPen = %d\n", bord->FrontPen, bord->BackPen); kprintf("DrawMode = %d\n", bord->DrawMode); kprintf("Count = %d\n", bord->Count); kprintf("XY = %lx\n", bord->XY); kprintf("\n\n"); } dispairs(pairs) SHORT *pairs; { kprintf("Pairs\n"); kprintf("%d %d\n", pairs[0], pairs[1]); kprintf("%d %d\n", pairs[2], pairs[3]); kprintf("%d %d\n", pairs[4], pairs[5]); kprintf("%d %d\n", pairs[6], pairs[7]); kprintf("%d %d\n", pairs[8], pairs[9]); kprintf("\n"); } dispprop(prop) struct PropInfo *prop; { kprintf("Adr = %lx\n\n", prop); kprintf("Flags = %x\n", prop->Flags); kprintf("HorizPot = %lx\n", prop->HorizPot); kprintf("VertPot = %x\n", prop->VertPot); kprintf("HorizBody = %x\n", prop->HorizBody); kprintf("VertBody = %x\n", prop->VertBody); kprintf("CWidth = %x\n", prop->CWidth); kprintf("HPotRes = %x\n", prop->HPotRes); kprintf("VPotRes = %x\n", prop->VPotRes); kprintf("LeftBorder = %x\n", prop->LeftBorder); kprintf("TopBorder = %x\n", prop->TopBorder); kprintf("\n\n"); }