Mercurial > ~dholland > hg > ag > index.cgi
view anagram/guisupport/action.cpp @ 8:ec2b657edf13
Add explicit lint-comment-style fallthrough annotations.
GCC now assumes that if you don't have these you're making a mistake,
which is annoying.
XXX: This changeset updates the AG output files only (by hand) and is
XXX: abusive - rebuilding them will erase the change. However, I need
XXX: to get things to build before I can try to get AG to issue the
XXX: annotations itself, so this seems like a reasonable expedient.
author | David A. Holland |
---|---|
date | Mon, 30 May 2022 23:51:43 -0400 |
parents | 13d2b8934445 |
children |
line wrap: on
line source
/* * AnaGram, A System for Syntax Directed Programming * Copyright 1997-2002 Parsifal Software. All Rights Reserved. * See the file COPYING for license and usage terms. * * action.cpp */ #include "action.h" //#define INCLUDE_LOGGING #include "log.h" int AgAction::running = 0; AgStack<AgAction> AgAction::startupStack; AgAction actionObject(void (*function)()) { return AgSimpleAction(function); } void AgAction::startup() { LOGSECTION("AgAction::startup"); running = 1; int n = startupStack.size(); LOGV(n); int i; for (i = 0; i < n; i++) { startupStack[i].perform(); } startupStack.discardData(); } void AgAction::performDeferred() const { if (!running) { startupStack.push(*this); return; } LOGSECTION_OFF("AgAction::performDeferred"); LOGV((int) kernel); if (kernel == 0) { return; } kernel->lock(); AgActionEnqueueInGui(kernel); } void AgActionDispatchFromGui(AgAction::Kernel *kernel) { kernel->perform(); if (kernel->unlock()) { delete kernel; } } void defer(void (*function)()) { actionObject(function).performDeferred(); }