View | Details | Raw Unified
Collapse All | Expand All

(-) Singular/mod_raw.cc.orig (-9 / +9 lines)
 Lines 287-301    Link Here  
      extern char PC;
      extern char PC;
      #endif
      #endif
      /* OB: why this ??? */
      /* OB: why this ??? */
      /* char *t_buf=(char *)omAlloc(128); */
 
      char *t_buf=(char *)omAlloc(128); 
      char t_buf[128];
 
      //char t_buf[128];
 
      char *temp;
      char *temp;

        
      /* Extract information that termcap functions use.  */
      /* Extract information that termcap functions use.  */

            

              
      temp = tgetstr ("pc", (char **)&t_buf);

              
      temp = tgetstr ("pc", t_buf);

            

        
      PC = (temp!=NULL) ? *temp : '\0';
      PC = (temp!=NULL) ? *temp : '\0';

            

              
      BC=tgetstr("le",(char **)&t_buf);

              
      BC=tgetstr("le",t_buf);

            

            

              
      UP=tgetstr("up",(char **)&t_buf);

              
      UP=tgetstr("up",t_buf);

            

        

        
      /* Extract information we will use */
      /* Extract information we will use */

        
      colmax=tgetnum("co");
      colmax=tgetnum("co");

  

    

    

       Lines 303-309
       
    
  Link Here 
    

  

        
      fe_cursor_line=pagelength-1;
      fe_cursor_line=pagelength-1;

        

        
      /* init screen */
      /* init screen */

            

              
      temp = tgetstr ("ti", (char **)&t_buf);

              
      temp = tgetstr ("ti", t_buf);

            

        
      #if 0
      #if 0

        
      if (temp!=NULL) tputs(temp,1,fe_out_char);
      if (temp!=NULL) tputs(temp,1,fe_out_char);

        
      #endif
      #endif

  

    

    

       Lines 85-91
       
    
  Link Here 
    

  

        
  {"SearchPath",    's',     feResPath,  NULL,
  {"SearchPath",    's',     feResPath,  NULL,

        
   "$SINGULARPATH;"
   "$SINGULARPATH;"

        
   "%b/LIB;"
   "%b/LIB;"

            

              
   "%r/LIB;"

              
   "%r/share/singular/LIB;"

            

        
   "%r/../LIB;"
   "%r/../LIB;"

        
   "%d/LIB;"
   "%d/LIB;"

        
   "%d/../LIB"
   "%d/../LIB"

  

    

    

       Lines 40-50
       
    
  Link Here 
    

  

        
void* dynl_open_binary_warn(char* binary_name, const char* msg)
void* dynl_open_binary_warn(char* binary_name, const char* msg)

        
{
{

        
  void* handle = NULL;
  void* handle = NULL;

            

              
  const char* bin_dir = feGetResource('b');

              
  const char* bin_dir = feGetResource('r');

            

        
  if (bin_dir != NULL)
  if (bin_dir != NULL)

        
  {
  {

        
    char path_name[MAXPATHLEN];
    char path_name[MAXPATHLEN];

            

              
    sprintf(path_name, "%s%s%s.%s", bin_dir, DIR_SEPP, binary_name, 

              
    sprintf(path_name, "%s%s%s%s%s.%s", bin_dir, DIR_SEPP, "lib/singular", DIR_SEPP, binary_name, 

            

        
            DL_TAIL);
            DL_TAIL);

        
    handle = dynl_open(path_name);
    handle = dynl_open(path_name);

        
    if (handle == NULL && ! warn_handle)
    if (handle == NULL && ! warn_handle)