socsvn commit: r288821 - soc2015/clord/head/sys/contrib/ficl/ficlplatform

clord at FreeBSD.org clord at FreeBSD.org
Mon Jul 27 21:32:05 UTC 2015


Author: clord
Date: Mon Jul 27 21:32:03 2015
New Revision: 288821
URL: http://svnweb.FreeBSD.org/socsvn/?view=rev&rev=288821

Log:
  Fix ficlTextOut
  Have ficlCallbackDefaultTextOut call our local fixlTextOut function. Also
  add FICL_WANT_FILE option to functions requiring use of ficlFile.
  

Modified:
  soc2015/clord/head/sys/contrib/ficl/ficlplatform/unix.c

Modified: soc2015/clord/head/sys/contrib/ficl/ficlplatform/unix.c
==============================================================================
--- soc2015/clord/head/sys/contrib/ficl/ficlplatform/unix.c	Mon Jul 27 21:24:15 2015	(r288820)
+++ soc2015/clord/head/sys/contrib/ficl/ficlplatform/unix.c	Mon Jul 27 21:32:03 2015	(r288821)
@@ -4,40 +4,27 @@
 #include <sys/stat.h>
 #include <sys/types.h>
 
-#include "ficl.h"
-
-
-
-int ficlFileTruncate(ficlFile *ff, ficlUnsigned size)
-{
-	return ftruncate(fileno(ff->f), size);
-}
-
+#include <stand.h>
 
+#include "ficl.h"
+#include "sysdep.h"
 
-void *ficlMalloc(size_t size)
-{
-    return malloc(size);
-}
-
-void *ficlRealloc(void *p, size_t size)
+void  ficlCallbackDefaultTextOut(ficlCallback *callback, char *message)
 {
-    return realloc(p, size);
+    FICL_IGNORE(callback);
+    ficlTextOutLocal(NULL, message, 0);
+    return;
 }
 
-void ficlFree(void *p)
+void ficlSystemCompilePlatform(ficlSystem *system)
 {
-    free(p);
+    return;
 }
 
-void  ficlCallbackDefaultTextOut(ficlCallback *callback, char *message)
+#if (FICL_WANT_FILE)
+int ficlFileTruncate(ficlFile *ff, ficlUnsigned size)
 {
-    FICL_IGNORE(callback);
-    if (message != NULL)
-        fputs(message, stdout);
-    else
-        fflush(stdout);
-    return;
+	return ftruncate(fileno(ff->f), size);
 }
 
 int ficlFileStatus(char *filename, int *status)
@@ -65,13 +52,4 @@
 	
     return statbuf.st_size;
 }
-
-
-
-
-void ficlSystemCompilePlatform(ficlSystem *system)
-{
-    return;
-}
-
-
+#endif


More information about the svn-soc-all mailing list