Esempi in C++ (Cpp) per EnvGetDefmodulePPForm

Esempio n. 1

File: modulbsc.c Progetto: aliverobotics/Pumas-SmallSize

globle int PPDefmodule(
  void *theEnv,
  char *defmoduleName,
  char *logicalName)
  {
   void *defmodulePtr;

   defmodulePtr = EnvFindDefmodule(theEnv,defmoduleName);
   if (defmodulePtr == NULL)
     {
      CantFindItemErrorMessage(theEnv,"defmodule",defmoduleName);
      return(FALSE);
     }

   if (EnvGetDefmodulePPForm(theEnv,defmodulePtr) == NULL) return(TRUE);
   PrintInChunks(theEnv,logicalName,EnvGetDefmodulePPForm(theEnv,defmodulePtr));
   return(TRUE);
  }

Esempio n. 2

File: modulbsc.c Progetto: guitarpoet/php-clips

bool PPDefmodule(
  void *theEnv,
  const char *defmoduleName,
  const char *logicalName)
  {
   void *defmodulePtr;

   defmodulePtr = EnvFindDefmodule(theEnv,defmoduleName);
   if (defmodulePtr == NULL)
     {
      CantFindItemErrorMessage(theEnv,"defmodule",defmoduleName);
      return(false);
     }

   if (EnvGetDefmodulePPForm(theEnv,defmodulePtr) == NULL) return(true);
   PrintInChunks(theEnv,logicalName,EnvGetDefmodulePPForm(theEnv,defmodulePtr));
   return(true);
  }

Esempio n. 3

File: modulbsc.c Progetto: aliverobotics/Pumas-SmallSize

static void SaveDefmodules(
  void *theEnv,
  void *theModule,
  char *logicalName)
  {
   char *ppform;

   ppform = EnvGetDefmodulePPForm(theEnv,theModule);
   if (ppform != NULL)
     {
      PrintInChunks(theEnv,logicalName,ppform);
      EnvPrintRouter(theEnv,logicalName,"\n");
     }
  }