Roxen.git / server / base_server / newdecode.pike

version» Context lines:

Roxen.git/server/base_server/newdecode.pike:1:   // This file is part of Roxen WebServer.   // Copyright © 1996 - 2009, Roxen IS. - // $Id: newdecode.pike,v 1.36 2009/05/07 14:15:53 mast Exp $ + // $Id$      // The magic below is for the 'install' program   #ifndef roxenp - # if !efun(roxenp) + # if !constant(roxenp)   # define roxenp this_object   # endif   #endif      #include <roxen.h>      #define ENC_ADD(X)do{if(arrayp(res->res))res->res+=({(X)});else res->res=(X); return "foo";}while(0)   #define SIMPLE_DECODE(X,Y) private string X(Parser.HTML p, mapping m, string s, mapping res) { ENC_ADD( Y );}      SIMPLE_DECODE(decode_int, (int)s );