comparison src/lread.c @ 8906:93f3d6f5753c

(openp): Fix Lisp_Object vs. int problems.

8905:2ef3da79aabb

	      if (fd >= 0)
		{
		  /* We succeeded; return this descriptor and filename.  */
		  if (storeptr)
		    *storeptr = build_string (fn);
		  RETURN_UNGCPRO (fd);
		}
	    }

	  /* Advance to next suffix.  */
	  if (esuffix == 0)
	    break;
	  nsuffix += lsuffix + 1;
	}
      if (absolute)
	RETURN_UNGCPRO (-1);
    }

  RETURN_UNGCPRO (-1);
}


/* Merge the list we've accumulated of globals from the current input source
   into the load_history variable.  The details depend on whether

8906:93f3d6f5753c

	      if (fd >= 0)
		{
		  /* We succeeded; return this descriptor and filename.  */
		  if (storeptr)
		    *storeptr = build_string (fn);
		  UNGCPRO;
		  return fd;
		}
	    }

	  /* Advance to next suffix.  */
	  if (esuffix == 0)
	    break;
	  nsuffix += lsuffix + 1;
	}
      if (absolute)
	break;
    }

  UNGCPRO;
  return -1;
}


/* Merge the list we've accumulated of globals from the current input source
   into the load_history variable.  The details depend on whether