[comp.sys.amiga] 4 of 21 - dispgad.c

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");
}