1
0
mirror of https://github.com/cc65/cc65.git synced 2024-12-27 00:29:31 +00:00
cc65/samples/geos/overlay-demo.c
Greg King 0390c34e88 Changed multi-line C comments into another style.
The left side doesn't look unbalanced.
2014-06-30 16:51:07 -04:00

133 lines
3.0 KiB
C

/*
** Minimalistic GEOSLib overlay demo program
**
** 2012-01-01, Oliver Schmidt (ol.sc@web.de)
**
*/
#include <stdio.h>
#include <geos.h>
#include "overlay-demores.h"
/* Functions resident in an overlay can call back functions resident in the
** main program at any time without any precautions. The function show() is
** an example for such a function resident in the main program.
*/
void show(char *name)
{
char line1[40];
sprintf(line1, CBOLDON "Overlay Demo - Overlay %s" CPLAINTEXT, name);
DlgBoxOk(line1, "Click OK to return to Main.");
}
/* In a real-world overlay program one would probably not use a #pragma but
** rather place the all the code of certain source files into the overlay by
** compiling them with --code-name OVERLAY1.
*/
#pragma code-name(push, "OVERLAY1");
void foo(void)
{
/* Functions resident in an overlay can access all program variables and
** constants at any time without any precautions because those are never
** placed in overlays. The string constant "One" is an example for such
** a constant resident in the main program.
*/
show("One");
}
#pragma code-name(pop);
#pragma code-name(push, "OVERLAY2");
void bar(void)
{
show("Two");
}
#pragma code-name(pop);
#pragma code-name(push, "OVERLAY3");
void foobar (void)
{
show("Three");
}
#pragma code-name(pop);
void main(int /*argc*/, char *argv[])
{
if (OpenRecordFile(argv[0])) {
_poserror("OpenRecordFile");
return;
}
DlgBoxOk(CBOLDON "Overlay Demo - Main" CPLAINTEXT,
"Click OK to call Overlay One.");
if (PointRecord(1)) {
_poserror("PointRecord.1");
return;
}
/* The macro definitions OVERLAY_ADDR and OVERLAY_SIZE were generated in
** overlay-demores.h by grc65. They contain the overlay area address and
** size specific to a certain program.
*/
if (ReadRecord(OVERLAY_ADDR, OVERLAY_SIZE)) {
_poserror("ReadRecord.1");
return;
}
/* The linker makes sure that the call to foo() ends up at the right mem
** addr. However, it's up to user to make sure that the -- right -- overlay
** actually is loaded before making the call.
*/
foo();
DlgBoxOk(CBOLDON "Overlay Demo - Main" CPLAINTEXT,
"Click OK to call Overlay Two.");
if (PointRecord(2)) {
_poserror("PointRecord.2");
return;
}
/* Replacing one overlay with another one can only happen from the main
** program. This implies that an overlay can never load another overlay.
*/
if (ReadRecord(OVERLAY_ADDR, OVERLAY_SIZE)) {
_poserror("ReadRecord.2");
return;
}
bar();
DlgBoxOk(CBOLDON "Overlay Demo - Main" CPLAINTEXT,
"Click OK to call Overlay Three.");
if (PointRecord(3)) {
_poserror("PointRecord.3");
return;
}
if (ReadRecord(OVERLAY_ADDR, OVERLAY_SIZE)) {
_poserror("ReadRecord.3");
return;
}
foobar();
if (CloseRecordFile()) {
_poserror("CloseRecordFile");
return;
}
}