Commit 7f8dded2 authored by Erick's avatar Erick

Two bug fixes

parent f3583a7c
......@@ -21,7 +21,7 @@
;;;;
;;;; Author: Erick Gallesio [eg@essi.fr]
;;;; Creation date: 15-Jan-2007 12:10 (eg)
;;;; Last file update: 21-Aug-2010 15:18 (eg)
;;;; Last file update: 25-Aug-2010 23:57 (eg)
;;;;
......@@ -92,7 +92,7 @@
;; if we have a configure or Makefile go in dir
(when (or (file-exists? tuneconf)
(file-exists? tunemake))
(printf "\t(cd ~a; make ~ainstall)\n" tunedir prefix))
(printf "\t(cd ~a; $(MAKE) ~ainstall)\n" tunedir prefix))
;; installing the object file
(printf "\tstklos-pkg ~a --cp ~a ~a lib 0755 && \\\n"
option x obj)
......
/*
* f p o r t . c -- File ports
*
* Copyright 2000-2009 Erick Gallesio - I3S-CNRS/ESSI <eg@unice.fr>
* Copyright 2000-2010 Erick Gallesio - I3S-CNRS/ESSI <eg@unice.fr>
*
*
* This program is free software; you can redistribute it and/or modify
......@@ -21,7 +21,7 @@
*
* Author: Erick Gallesio [eg@unice.fr]
* Creation date: 8-Jan-2000 14:48 (eg)
* Last file update: 3-Oct-2009 21:41 (eg)
* Last file update: 12-Sep-2010 10:59 (eg)
*
* This implementation is built by reverse engineering on an old SUNOS 4.1.1
* stdio.h. It has been simplified to fit the needs for STklos. In particular
......@@ -139,7 +139,7 @@ static void fill_buffer(struct fstream *f)
}
while ((n == -1) && (errno == EINTR));
if (n == 0) {
if (n <= 0) {
PORT_STREAM_FLAGS(f) |= STK_IOEOF;
} else {
PORT_CNT(f) = n;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment