Changeset 56459d in git


Ignore:
Timestamp:
Apr 16, 1998, 10:12:55 AM (25 years ago)
Author:
Wilfred Pohl <pohl@…>
Branches:
(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a800fe4b3e9d37a38c5a10cc0ae9dfa0c15a4ee6')
Children:
d342489c79babd63859a72fa96b3277dae827b3e
Parents:
0f678f9af2ce804297ea85555d74aeef2879cded
Message:
Changes for macintosh


git-svn-id: file:///usr/local/Singular/svn/trunk@1380 2c84dea3-7e68-4137-9b89-c4e89433aadc
File:
1 edited

Legend:

Unmodified
Added
Removed
  • Singular/libparse.l

    r0f678f r56459d  
    33*  Computer Algebra System SINGULAR     *
    44****************************************/
    5 /* $Id: libparse.l,v 1.5 1998-04-06 16:27:20 krueger Exp $ */
     5/* $Id: libparse.l,v 1.6 1998-04-16 08:12:55 pohl Exp $ */
    66#include <stdio.h>
    77#include <string.h>
     
    8383#define YYLP_MISS_BR3   12
    8484
     85#ifdef __MWERKS__
    8586#ifdef __cplusplus
    8687extern "C" {
     
    9293long   tell(int filedes);
    9394int    isatty(int filedes);
     95#else
     96int    _fileno(FILE *stream);
     97FILE   *_fdopen(int filedes, char *type);
     98long   _ftell(FILE *fp);
     99long   _tell(int filedes);
     100int    _isatty(int filedes);
     101#define fileno  _fileno
     102#define fdopen  _fdopen
     103#define ftell    _ftell
     104#define tell    _tell
     105#define isatty  _isatty
    94106#endif /* macintosh */
    95107#ifdef __cplusplus
    96108}
     109#endif
    97110#endif
    98111
     
    108121}
    109122#else /* STANDALONE_PARSER */
    110 idhdl h;
    111 #  define pi IDPROC(h)
     123idhdl h0;
     124#  define pi IDPROC(h0)
    112125extern "C"
    113126{
     
    244257               sscanf( yytext, "%*[^p]proc %s", proc);
    245258               if(strlen(proc)<1) sscanf( yytext, "proc %s", proc);
    246                h = enterid( mstrdup(proc), myynest, PROC_CMD,
     259               h0 = enterid( mstrdup(proc), myynest, PROC_CMD,
    247260                                   &idroot, FALSE );
    248                if (h!=NULL) {
    249                  iiInitSingularProcinfo(IDPROC(h), newlib, proc,
     261               if (h0!=NULL) {
     262                 iiInitSingularProcinfo(IDPROC(h0), newlib, proc,
    250263                                yylplineno, current_pos(0),p_static);
    251264                 if (BVERBOSE(V_LOAD_PROC))
Note: See TracChangeset for help on using the changeset viewer.