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