surement déjà demandé Self-Pointing - Page 2

// Cherche le mot nul (pas while(*--p || *--p) à cause de l'évaluation paresseuse)
 while(*(p--) || *p) [b]p-=3;[/b]

// C Source File
// Created 03.11.2002; 03:38:06

#define USE_TI89              // Compile for TI-89
#define USE_TI92PLUS          // Compile for TI-92 Plus
#define USE_V200              // Compile for V200

// #define OPTIMIZE_ROM_CALLS // Use ROM Call Optimization

#define MIN_AMS 100           // Compile for AMS 1.00 or higher

#define SAVE_SCREEN           // Save/Restore LCD Contents

#include <tigcclib.h>         // Include All Header Files

// Main Function
void _main(void)
{
extern void program_start_label asm("tigcc_compiled.") // n'oublie pas le point! 
void *program_start=&program_start_label; 
void *program_start_noghost=(void *)((unsigned long)program_start&0x3ffff);
clrscr();
printf("%lp",program_start_noghost);
ngetchx();
}