mes: Run build-aux/indent.sh.
authorJan Nieuwenhuizen <janneke@gnu.org>
Sat, 18 May 2019 11:27:42 +0000 (13:27 +0200)
committerJan Nieuwenhuizen <janneke@gnu.org>
Sat, 18 May 2019 11:27:42 +0000 (13:27 +0200)
* src/mes.c: Re-indent.
* src: Likewise.
* include: Likewise.
* lib: Likewise.
* scaffold: Likewise.

270 files changed:
include/alloca.h
include/ar.h
include/assert.h
include/dirent.h
include/dirstream.h
include/features.h
include/libgen.h
include/locale.h
include/math.h
include/mes/lib-mini.h
include/mes/lib.h
include/pwd.h
include/signal.h
include/stdarg.h
include/stdio.h
include/stdlib.h
include/string.h
include/strings.h
include/sys/cdefs.h
include/sys/ioctl.h
include/sys/select.h
include/sys/timeb.h
include/sys/ucontext.h
include/sys/user.h
include/time.h
include/unistd.h
lib/assert/assert.c
lib/dirent/__getdirentries.c
lib/dirent/closedir.c
lib/dirent/opendir.c
lib/dirent/readdir.c
lib/libmes.c
lib/libtcc1.c
lib/linux/access.c
lib/linux/brk.c
lib/linux/chdir.c
lib/linux/chmod.c
lib/linux/clock_gettime.c
lib/linux/close.c
lib/linux/dup.c
lib/linux/dup2.c
lib/linux/execve.c
lib/linux/fcntl.c
lib/linux/fstat.c
lib/linux/fsync.c
lib/linux/getcwd.c
lib/linux/getdents.c
lib/linux/getrusage.c
lib/linux/gettimeofday.c
lib/linux/ioctl.c
lib/linux/kill.c
lib/linux/link.c
lib/linux/lseek.c
lib/linux/lstat.c
lib/linux/mkdir.c
lib/linux/nanosleep.c
lib/linux/open.c
lib/linux/pipe.c
lib/linux/read.c
lib/linux/rename.c
lib/linux/rmdir.c
lib/linux/setgid.c
lib/linux/settimer.c
lib/linux/setuid.c
lib/linux/signal.c
lib/linux/sigprogmask.c
lib/linux/stat.c
lib/linux/time.c
lib/linux/unlink.c
lib/linux/waitpid.c
lib/linux/x86_64-mes/crt1.c
lib/linux/x86_64-mes/mes.c
lib/linux/x86_64-mes/mini.c
lib/mes/eputs.c
lib/mes/fdgetc.c
lib/mes/fdputc.c
lib/mes/fdputs.c
lib/mes/ntoab.c
lib/mes/oputs.c
lib/mes/search-path.c
lib/posix/execl.c
lib/posix/execvp.c
lib/posix/getenv.c
lib/posix/getopt.c
lib/posix/mktemp.c
lib/posix/setenv.c
lib/posix/wait.c
lib/stdio/clearerr.c
lib/stdio/fclose.c
lib/stdio/fdopen.c
lib/stdio/feof.c
lib/stdio/ferror.c
lib/stdio/fflush.c
lib/stdio/fgetc.c
lib/stdio/fgets.c
lib/stdio/fileno.c
lib/stdio/fopen.c
lib/stdio/fprintf.c
lib/stdio/fputc.c
lib/stdio/fputs.c
lib/stdio/fread.c
lib/stdio/freeopen.c
lib/stdio/freopen.c
lib/stdio/fseek.c
lib/stdio/ftell.c
lib/stdio/fwrite.c
lib/stdio/getc.c
lib/stdio/printf.c
lib/stdio/putc.c
lib/stdio/putchar.c
lib/stdio/snprintf.c
lib/stdio/sprintf.c
lib/stdio/ungetc.c
lib/stdio/vfprintf.c
lib/stdio/vprintf.c
lib/stdio/vsnprintf.c
lib/stdio/vsprintf.c
lib/stdio/vsscanf.c
lib/stdlib/alloca.c
lib/stdlib/mbstowcs.c
lib/stdlib/puts.c
lib/stdlib/qsort.c
lib/string/argz-count.c
lib/string/argz-extract.c
lib/string/memcpy.c
lib/string/memmem.c
lib/string/memmove.c
lib/string/strcmp.c
lib/string/strdup.c
lib/string/strerror.c
lib/string/strlen.c
lib/string/strncat.c
lib/string/strncmp.c
lib/string/strpbrk.c
lib/stub/fpurge.c
lib/stub/freadahead.c
lib/stub/setvbuf.c
lib/stub/sigaddset.c
lib/stub/sigdelset.c
lib/stub/sigemptyset.c
lib/stub/strftime.c
lib/stub/ttyname.c
lib/tests/assert/50-assert.c
lib/tests/dirent/90-readdir.c
lib/tests/io/90-stat.c
lib/tests/mes/50-itoa.c
lib/tests/setjmp/80-setjmp.c
lib/tests/signal/90-signal.c
lib/tests/stdio/70-printf-simple.c
lib/tests/stdio/70-printf.c
lib/tests/stdio/90-fopen-append.c
lib/tests/stdio/90-fopen.c
lib/tests/stdio/90-fread-fwrite.c
lib/tests/stdio/90-fseek.c
lib/tests/stdlib/50-malloc.c
lib/tests/stdlib/70-strtoull.c
lib/tests/stdlib/80-qsort-dupes.c
lib/tests/stdlib/80-qsort.c
lib/tests/stdlib/90-strtol.c
lib/tests/string/30-strlen.c
lib/tests/string/50-strcmp.c
lib/tests/string/80-strncpy.c
lib/tests/string/90-snprintf.c
lib/tests/string/90-strpbrk.c
lib/x86-mes-gcc/setjmp.c
lib/x86-mes/setjmp.c
lib/x86_64-mes/setjmp.c
scaffold/argv.c
scaffold/cons-mes.c
scaffold/micro-mes.c
scaffold/read.c
scaffold/tests/14-if-goto.c
scaffold/tests/17-compare-unsigned-char-le.c
scaffold/tests/17-compare-unsigned-short-le.c
scaffold/tests/18-assign-shadow.c
scaffold/tests/32-call-wrap.c
scaffold/tests/32-compare.c
scaffold/tests/33-and-or.c
scaffold/tests/34-pre-post.c
scaffold/tests/35-compare-char.c
scaffold/tests/38-compare-call.c
scaffold/tests/42-goto-label.c
scaffold/tests/43-for-do-while.c
scaffold/tests/44-switch-body-fallthrough.c
scaffold/tests/44-switch-fallthrough.c
scaffold/tests/44-switch.c
scaffold/tests/47-function-expression.c
scaffold/tests/48-global-static.c
scaffold/tests/51-pointer-sub.c
scaffold/tests/54-argc.c
scaffold/tests/54-argv.c
scaffold/tests/55-char-array.c
scaffold/tests/60-math.c
scaffold/tests/61-array.c
scaffold/tests/62-array.c
scaffold/tests/63-struct-array-assign.c
scaffold/tests/63-struct-array-compare.c
scaffold/tests/63-struct-array.c
scaffold/tests/63-struct-assign.c
scaffold/tests/63-struct-cell.c
scaffold/tests/63-struct-function.c
scaffold/tests/63-struct-local.c
scaffold/tests/63-struct-pointer.c
scaffold/tests/63-struct.c
scaffold/tests/64-make-cell.c
scaffold/tests/65-read.c
scaffold/tests/66-local-char-array.c
scaffold/tests/70-stdarg.c
scaffold/tests/71-struct-array.c
scaffold/tests/72-typedef-struct-def.c
scaffold/tests/73-union-hello.c
scaffold/tests/73-union.c
scaffold/tests/74-multi-line-string.c
scaffold/tests/75-struct-union.c
scaffold/tests/76-pointer-arithmetic.c
scaffold/tests/77-pointer-assign.c
scaffold/tests/78-union-struct.c
scaffold/tests/79-int-array-simple.c
scaffold/tests/79-int-array.c
scaffold/tests/7a-struct-char-array.c
scaffold/tests/7b-struct-int-array-hello.c
scaffold/tests/7b-struct-int-array-pointer.c
scaffold/tests/7b-struct-int-array.c
scaffold/tests/7c-dynarray.c
scaffold/tests/7d-cast-char.c
scaffold/tests/7e-struct-array-access.c
scaffold/tests/7f-struct-pointer-arithmetic.c
scaffold/tests/7g-struct-byte-word-field.c
scaffold/tests/7h-struct-assign.c
scaffold/tests/7i-struct-struct-simple.c
scaffold/tests/7i-struct-struct.c
scaffold/tests/7k-empty-for.c
scaffold/tests/7k-for-each-elem-simple.c
scaffold/tests/7k-for-each-elem.c
scaffold/tests/7l-struct-any-size-array.c
scaffold/tests/7m-struct-char-array-assign.c
scaffold/tests/7n-struct-struct-array.c
scaffold/tests/7o-struct-pre-post-simple.c
scaffold/tests/7o-struct-pre-post.c
scaffold/tests/7p-struct-cast.c
scaffold/tests/7q-bit-field-simple.c
scaffold/tests/7q-bit-field.c
scaffold/tests/7r-sign-extend.c
scaffold/tests/7s-struct-short.c
scaffold/tests/7t-function-destruct.c
scaffold/tests/7u-struct-func.c
scaffold/tests/7u-struct-size10.c
scaffold/tests/7u-vstack.c
scaffold/tests/82-define.c
scaffold/tests/83-heterogenoous-init.c
scaffold/tests/84-struct-field-list.c
scaffold/tests/85-sizeof.c
scaffold/tests/90-goto-var.c
scaffold/tests/91-goto-array.c
scaffold/tests/a0-call-trunc-char.c
scaffold/tests/a0-call-trunc-int.c
scaffold/tests/a0-call-trunc-short.c
scaffold/tests/t.c
scaffold/tiny-mes.c
src/gc.c
src/hash.c
src/lib.c
src/math.c
src/mes.c
src/module.c
src/posix.c
src/reader.c
src/string.c
src/struct.c
src/vector.c

index eae15876782c03aef2cf4d6d1fdf240b15b709e0..71c9b4831af0b9c0d4fbb73c7938b244fbf27ba0 100644 (file)
@@ -36,11 +36,11 @@ typedef unsigned long size_t;
 #endif
 
 #if _ALLOCA_UNSIGNED
-void * alloca (unsigned size);
+void *alloca (unsigned size);
 #elif _ALLOCA_CHAR
-char * alloca (int);
+char *alloca (int);
 #else
-void * alloca (size_t size);
+void *alloca (size_t size);
 #endif
 
 #endif // ! WITH_GLIBC
index bcefb3d036f63f38e0463d4996202bb4e99bf4bd..ab01cb8fbde8884d7770fa9018de0c22afc44e51 100644 (file)
    `struct ar_hdr', and as many bytes of member file data as its `ar_size'
    member indicates, for each member file.  */
 
-#define ARMAG  "!<arch>\n"     /* String that begins an archive file.  */
-#define SARMAG 8               /* Size of that string.  */
+#define ARMAG  "!<arch>\n"     /* String that begins an archive file.  */
+#define SARMAG 8               /* Size of that string.  */
 
-#define ARFMAG "`\n"           /* String in ar_fmag at end of each header.  */
+#define ARFMAG "`\n"           /* String in ar_fmag at end of each header.  */
 
 struct ar_hdr
-  {
-    char ar_name[16];          /* Member file name, sometimes / terminated. */
-    char ar_date[12];          /* File date, decimal seconds since Epoch.  */
-    char ar_uid[6], ar_gid[6]; /* User and group IDs, in ASCII decimal.  */
-    char ar_mode[8];           /* File mode, in ASCII octal.  */
-    char ar_size[10];          /* File size, in ASCII decimal.  */
-    char ar_fmag[2];           /* Always contains ARFMAG.  */
-  };
+{
+  char ar_name[16];             /* Member file name, sometimes / terminated. */
+  char ar_date[12];             /* File date, decimal seconds since Epoch.  */
+  char ar_uid[6], ar_gid[6];    /* User and group IDs, in ASCII decimal.  */
+  char ar_mode[8];              /* File mode, in ASCII octal.  */
+  char ar_size[10];             /* File size, in ASCII decimal.  */
+  char ar_fmag[2];              /* Always contains ARFMAG.  */
+};
 
 #endif // ! WITH_GLIBC
 
index 7bfbac484870e1433ef5a0d6e55f48678d74efe9..11f631392576c81551978d26d3d1c66fae86c45a 100644 (file)
@@ -28,7 +28,7 @@
 #include_next <assert.h>
 #else // ! WITH_GLIBC
 #define assert(x) ((x) ? (void)0 : assert_fail (#x))
-void assert_fail (chars);
+void assert_fail (char *s);
 #endif // ! WITH_GLIBC
 
 #endif // __MES_ASSERT_H
index cc8be20bd4741f3f7ac629c12e765d0cfee9cd0d..fb45229a5a31025cbd54ec5684760456f9d0e891 100644 (file)
 
 #include <stddef.h>
 
-int __getdirentries (int filedes, char *buffer, size_t nbytes, off_t *basep);
+int __getdirentries (int filedes, char *buffer, size_t nbytes, off_t * basep);
 
 struct dirent
-  {
-    ino_t d_ino;
-    off_t d_off;
-    unsigned short int d_reclen;
+{
+  ino_t d_ino;
+  off_t d_off;
+  unsigned short int d_reclen;
 #if 0
-    unsigned char d_type;
+  unsigned char d_type;
 #endif
-    char d_name[256];          /* We must not include limits.h! */
-  };
+  char d_name[256];             /* We must not include limits.h! */
+};
 
 /* Open a directory stream on NAME.
    Return a DIR stream on the directory, or NULL if it could not be opened.  */
@@ -60,16 +60,16 @@ DIR *opendir (char const *name);
 
 /* Close the directory stream DIRP.
    Return 0 if successful, -1 if not.  */
-int closedir (DIR *dirp);
+int closedir (DIR * dirp);
 
 /* Read a directory entry from DIRP.
    Return a pointer to a `struct dirent' describing the entry,
    or NULL for EOF or error.  The storage returned may be overwritten
    by a later readdir call on the same DIR stream.  */
-struct dirent *readdir (DIR *dirp);
+struct dirent *readdir (DIR * dirp);
 
 /* Rewind DIRP to the beginning of the directory.  */
-extern void rewinddir (DIR *dirp);
+extern void rewinddir (DIR * dirp);
 
 #endif // ! WITH_GLIBC
 
index d4c43437927ad82e38050f3f6c68daaa812d94f3..31e369b11ef6bfc8625d752b670b7a6285eba933 100644 (file)
 
 /* Directory stream type.  */
 struct __dirstream
-  {
-    int fd;                    /* File descriptor.  */
+{
+  int fd;                       /* File descriptor.  */
 
-    char *data;                        /* Directory block.  */
-    size_t allocation;         /* Space allocated for the block.  */
-    size_t size;               /* Total valid data in the block.  */
-    size_t offset;             /* Current offset into the block.  */
+  char *data;                   /* Directory block.  */
+  size_t allocation;            /* Space allocated for the block.  */
+  size_t size;                  /* Total valid data in the block.  */
+  size_t offset;                /* Current offset into the block.  */
 
-    off_t filepos;             /* Position of next entry to read.  */
-  };
+  off_t filepos;                /* Position of next entry to read.  */
+};
 
 typedef struct __dirstream DIR;
 
index 1d0e7eb7624de6d648b810b49c44b8d076456a94..aa56b0520a01e30c8bad31b3bdad75fc0e7455d6 100644 (file)
@@ -26,4 +26,3 @@
 #endif // (WITH_GLIBC)
 
 #endif // __MES_FEATURES_H
-
index 2cb080c437d6b0d4dbcda80b1d2ef7652834cb7b..be76015cc407e2199bf335dbdeb31f88655fd21e 100644 (file)
@@ -28,7 +28,7 @@
 #include_next <libgen.h>
 
 #else // ! WITH_GLIBC
-char* dirname (char*);
+char *dirname (char *);
 #endif // ! WITH_GLIBC
 
 #endif // __MES_LIBGEN_H
index 12b145a01069bfbc34d395895238fdefc4991e07..1cdacda616995593b4e52a4da912ac67e9611efb 100644 (file)
@@ -38,7 +38,7 @@
 #endif
 // *INDENT-ON*
 
-char * setlocale (int category, char const *locale);
+char *setlocale (int category, char const *locale);
 
 #endif // ! WITH_GLIBC
 
index aea4e92382c592b716742e4b4e319931ba2832ab..6ba64bcf0cc903313bf063020c644d181ada4796 100644 (file)
@@ -23,9 +23,9 @@
 #if WITH_GLIBC
 #undef __MES_MATH_H
 #include_next <math.h>
-#else  // ! WITH_GLIBC
+#else // ! WITH_GLIBC
 double ldexp (double x, int exp);
-#endif  // ! WITH_GLIBC
+#endif // ! WITH_GLIBC
 
 double fabs (double number);
 
index ed141a922c5117ceaae3b402ef0d1da3f006ca8b..7bc4953486b6462cb66dcdafad1ceecd477c43d9 100644 (file)
@@ -79,12 +79,12 @@ int __stdin;
 int __stdout;
 int __stderr;
 
-int eputs (char consts);
-int puts (char consts);
-int oputs (char consts);
+int eputs (char const *s);
+int puts (char const *s);
+int oputs (char const *s);
 
 #if !WITH_GLIBC
-size_t strlen (char consts);
+size_t strlen (char const *s);
 ssize_t _write ();
 ssize_t write (int filedes, void const *buffer, size_t size);
 #endif // !WITH_GLIBC
index 91b39783e7a99168c85ebf728f9ed87c91e88d2b..3e74c2dd6a57092fb03a210181f89a96276bc480 100644 (file)
@@ -39,7 +39,7 @@ int atoi (char const *s);
 int eputc (int c);
 int fdgetc (int fd);
 int fdputc (int c, int fd);
-int fdputs (char consts, int fd);
+int fdputs (char const *s, int fd);
 int fdungetc (int c, int fd);
 int _fdungetc_p (int fd);
 int isdigit (int c);
@@ -49,7 +49,7 @@ int mes_open (char const *file_name, int flags, int mask);
 int _open2 (char const *file_name, int flags);
 int _open3 (char const *file_name, int flags, int mask);
 int oputc (int c);
-int oputs (char consts);
+int oputs (char const *s);
 char *search_path (char const *file_name);
 
 #endif //__MES_LIB_H
index f0ce92442a9749ef9c3f8e64736bc593a5189d0e..f519e8e5bcfdbf2e027ef070d4487ef5e2f19c79 100644 (file)
@@ -23,7 +23,7 @@
 #if WITH_GLIBC
 #undef __MES_PWD_H
 #include_next <pwd.h>
-#else  // ! WITH_GLIBC
+#else // ! WITH_GLIBC
 
 struct passwd
 {
@@ -36,9 +36,9 @@ struct passwd
   char *pw_shell;
 };
 
-struct passwd * getpwuid ();
+struct passwd *getpwuid ();
 
 
-#endif  // ! WITH_GLIBC
+#endif // ! WITH_GLIBC
 
 #endif // __MES_PWD_H
index db1277529c7a953f99b537979e8480736f376c06..b8ed529984528a357bc174c4cb0aba0bfa0bd634 100644 (file)
@@ -118,7 +118,7 @@ typedef struct siginfo_t
 #if __MESC__
 typedef long sighandler_t;
 #else
-typedef void (*sighandler_t)(int);
+typedef void (*sighandler_t) (int);
 #endif
 
 struct sigaction
@@ -199,14 +199,14 @@ struct _libc_fpstate
 typedef struct _libc_fpstate *fpregset_t;
 
 typedef struct
-  {
-    gregset_t gregs;
-    /* Due to Linux's history we have to use a pointer here.  The SysV/i386
-       ABI requires a struct with the values.  */
-    fpregset_t fpregs;
-    unsigned long int oldmask;
-    unsigned long int cr2;
-  } mcontext_t;
+{
+  gregset_t gregs;
+  /* Due to Linux's history we have to use a pointer here.  The SysV/i386
+     ABI requires a struct with the values.  */
+  fpregset_t fpregs;
+  unsigned long int oldmask;
+  unsigned long int cr2;
+} mcontext_t;
 
 /* Userlevel context.  */
 typedef struct ucontext
@@ -222,19 +222,19 @@ typedef struct ucontext
 
 int kill (pid_t pid, int signum);
 int sigaction (int signum, struct sigaction const *act, struct sigaction *oldact);
-int sigaddset (sigset_t *set, int signum);
+int sigaddset (sigset_t * set, int signum);
 #if __MESC__
-void* signal (int signum, void * action);
+void *signal (int signum, void *action);
 #else
 sighandler_t signal (int signum, sighandler_t action);
 #endif
-int sigemptyset (sigset_t *set);
+int sigemptyset (sigset_t * set);
 #ifndef SIG_BLOCK
 #define SIG_BLOCK 0
 #define SIG_UNBLOCK 1
 #define SIG_SETMASK 2
 #endif
-int sigprocmask (int how, sigset_t const *set, sigset_t *oldset);
+int sigprocmask (int how, sigset_t const *set, sigset_t * oldset);
 
 #endif //! WITH_GLIBC
 
index 70912eb1cea9a9faeddd1ced4dacffc678ca0816..0c8c3f39a00027f3fe7c7506399f5a5180a4de85 100644 (file)
@@ -37,8 +37,8 @@ typedef char *va_list;
 #define va_end(ap) (void)((ap) = 0)
 #define va_copy(dest, src) dest = src
 
-int vfprintf (FILE *stream, char const *template, va_list ap);
-int vprintf (char constformat, va_list ap);
+int vfprintf (FILE * stream, char const *template, va_list ap);
+int vprintf (char const *format, va_list ap);
 int vsprintf (char *str, char const *format, va_list ap);
 int vsnprintf (char *str, size_t size, char const *format, va_list ap);
 int vsscanf (char const *s, char const *template, va_list ap);
index b305fe46a87754c9e02bb9a97e60e0aa30c573c8..cd8d8bd8ec5271055db278a71b00767a2acb0f71 100644 (file)
@@ -32,9 +32,9 @@
 #else // ! WITH_GLIBC
 
 #ifndef _IOFBF
-#define _IOFBF 0 /* Fully buffered.  */
-#define _IOLBF 1 /* Line buffered.  */
-#define _IONBF 2 /* No buffering.  */
+#define _IOFBF 0                /* Fully buffered.  */
+#define _IOLBF 1                /* Line buffered.  */
+#define _IONBF 2                /* No buffering.  */
 #endif
 
 #ifndef BUFSIZ
 FILE *fdopen (int fd, char const *mode);
 FILE *fopen (char const *file_name, char const *mode);
 int eputc (int c);
-int eputs (char consts);
-int fclose (FILE *stream);
-int feof (FILE *stream);
-int ferror (FILE *stream);
-int fflush (FILE *stream);
-int fgetc (FILE* stream);
-char *fgets (char *s, int size, FILE *stream);
-int fprintf (FILE *stream, char const *format, ...);
-int fpurge (FILE *stream);
-int fputc (int c, FILE *stream);
-int fputs (char const* s, FILE *stream);
-int fseek (FILE *stream, long offset, int whence);
-int getc (FILE *stream);
+int eputs (char const *s);
+int fclose (FILE * stream);
+int feof (FILE * stream);
+int ferror (FILE * stream);
+int fflush (FILE * stream);
+int fgetc (FILE * stream);
+char *fgets (char *s, int size, FILE * stream);
+int fprintf (FILE * stream, char const *format, ...);
+int fpurge (FILE * stream);
+int fputc (int c, FILE * stream);
+int fputs (char const *s, FILE * stream);
+int fseek (FILE * stream, long offset, int whence);
+int getc (FILE * stream);
 int getchar (void);
 char *getlogin (void);
-int printf (char constformat, ...);
-int putc (int c, FILE* stream);
+int printf (char const *format, ...);
+int putc (int c, FILE * stream);
 int putchar (int c);
-int puts (char consts);
+int puts (char const *s);
 int remove (char const *file_name);
-int setvbuf (FILE *stream, char *buf, int mode, size_t size);
-int snprintf(char *str,  size_t size,  char const *format, ...);
-int sprintf (char *str, char constformat, ...);
+int setvbuf (FILE * stream, char *buf, int mode, size_t size);
+int snprintf (char *str, size_t size, char const *format, ...);
+int sprintf (char *str, char const *format, ...);
 int sscanf (char const *str, const char *format, ...);
-int ungetc (int c, FILE* stream);
-long ftell (FILE *stream);
-size_t fread (void *ptr, size_t size, size_t count, FILE *stream);
-size_t freadahead (FILE *fp);
-size_t fwrite (void const *ptr, size_t size, size_t count, FILE *stream);
+int ungetc (int c, FILE * stream);
+long ftell (FILE * stream);
+size_t fread (void *ptr, size_t size, size_t count, FILE * stream);
+size_t freadahead (FILE * fp);
+size_t fwrite (void const *ptr, size_t size, size_t count, FILE * stream);
 
 #endif // ! WITH_GLIBC
 
index ce0b1a944bbfb9b6a7de10be7fcecbaa8649369a..7cc4e5c0b406877223ab3c9d1bd01b76033239b7 100644 (file)
@@ -26,7 +26,7 @@
 #endif
 #undef __MES_STDLIB_H
 #include_next <stdlib.h>
-#else  // ! WITH_GLIBC
+#else // ! WITH_GLIBC
 
 #include <sys/types.h>
 #include <alloca.h>
 double atof (char const *s);
 int atoi (char const *s);
 int atexit (void (*function) (void));
-void * calloc (size_t nmemb, size_t size);
+void *calloc (size_t nmemb, size_t size);
 void _exit (int status);
 void exit (int status);
 void free (void *ptr);
-char* getenv (char const* s);
-int setenv (char const* s, char const* v, int overwrite_p);
+char *getenv (char const *s);
+int setenv (char const *s, char const *v, int overwrite_p);
 void unsetenv (char const *name);
 void *malloc (size_t);
-void qsort (void *base, size_t nmemb, size_t size, int (*compar)(void const *, void const *));
+void qsort (void *base, size_t nmemb, size_t size, int (*compar) (void const *, void const *));
 int rand (void);
 void *realloc (void *p, size_t size);
 double strtod (char const *string, char **tailptr);
@@ -61,7 +61,7 @@ unsigned long long strtoull (char const *string, char **tailptr, int base);
 typedef int (*comparison_fn_t) (void const *, void const *);
 #endif
 
-void * bsearch (void const *key, void const *array, size_t count, size_t size, comparison_fn_t compare);
+void *bsearch (void const *key, void const *array, size_t count, size_t size, comparison_fn_t compare);
 
 #endif // ! WITH_GLIBC
 
index eb3a621529ed6f6ede5907ef3771d61afd14bf32..7b3056ebf05f8f93bbf7031d343438bf9092b42b 100644 (file)
@@ -45,25 +45,25 @@ typedef unsigned long size_t;
 typedef long ssize_t;
 #endif
 
-void * memchr (void const *block, int c, size_t size);
+void *memchr (void const *block, int c, size_t size);
 void *memcpy (void *dest, void const *src, size_t n);
 void *memmove (void *dest, void const *src, size_t n);
 void *memset (void *s, int c, size_t n);
-void * memchr (void const *block, int c, size_t size);
+void *memchr (void const *block, int c, size_t size);
 int memcmp (void const *s1, void const *s2, size_t n);
 
 char *strcat (char *dest, char const *src);
 char *strchr (char const *s, int c);
 int strcasecmp (char const *s1, char const *s2);
-int strcmp (char const*, char const*);
+int strcmp (char const *, char const *);
 char *strcpy (char *dest, char const *src);
-size_t strlen (char const*);
+size_t strlen (char const *);
 char *strncpy (char *to, char const *from, size_t size);
-int strncmp (char const*, char const*, size_t);
+int strncmp (char const *, char const *, size_t);
 char *strrchr (char const *s, int c);
 char *strstr (char const *haystack, char const *needle);
-char * strlwr (char *string);
-char * strupr (char *string);
+char *strlwr (char *string);
+char *strupr (char *string);
 
 
 char *strerror (int errnum);
index 9f56b68f0b5b2dc024957aad2c224744be5e1516..87041dc6d7fea415e1ebf79d70ee6b6d53b36b0e 100644 (file)
@@ -26,4 +26,3 @@
 #endif // (WITH_GLIBC)
 
 #endif // __MES_STRINGS_H
-
index ffabc30768b532df507c81dc44dec7c50cd396e3..8efde99b1dae8384a07e63ef903881c08b40475c 100644 (file)
@@ -26,4 +26,3 @@
 #endif // (WITH_GLIBC)
 
 #endif // __MES_SYS_CDEFS_H
-
index e1bff6af6394ae1fe19e39c6741fd071717b5180..dfe296a1d77151717c20436115b47e39c0f95398 100644 (file)
@@ -33,4 +33,3 @@ int ioctl (int fd, unsigned long request, ...);
 #endif // ! WITH_GLIBC
 
 #endif // __MES_SYS_IOCTL_H
-
index d82636fab9828c7bc1094b707d028cac54ef793b..9dc160bd699494f41e890476b17eb7a80eac50d8 100644 (file)
@@ -23,9 +23,8 @@
 #if WITH_GLIBC
 #undef __MES_SYS_SELECT_H
 #include_next <sys/select.h>
-#else  //! WITH_GLIBC
+#else //! WITH_GLIBC
 typedef int fd_set;
 #endif //! WITH_GLIBC
 
 #endif // __MES_SYS_SELECT_H
-
index 259250a036b42ee4ca02f61e698755ed408fd41c..31e40ece2de9d7c9391b985eb7406f5353d2d4ec 100644 (file)
@@ -26,4 +26,3 @@
 #endif // (WITH_GLIBC)
 
 #endif // __MES_SYS_TIMEB_H
-
index ba473db7d0bf3b215dd989bdcbc69ebdcd498d69..fa7df2bc8262c2b48b1af88dd8182a310a008ff8 100644 (file)
@@ -26,4 +26,3 @@
 #endif // (WITH_GLIBC)
 
 #endif // __MES_SYS_UCONTEXT_H
-
index 99d29dd9190a82c6820f32c7223b41cf2929e6dd..5f90fd58f5eac7aae4e9071236e0e07c7e5e9ed4 100644 (file)
@@ -36,7 +36,7 @@ struct user_fpregs_struct
   long int fcs;
   long int foo;
   long int fos;
-  long int st_space [20];
+  long int st_space[20];
 };
 
 struct user_fpxregs_struct
@@ -51,8 +51,8 @@ struct user_fpxregs_struct
   long int fos;
   long int mxcsr;
   long int reserved;
-  long int st_space[32];   /* 8*16 bytes for each FP-reg = 128 bytes */
-  long int xmm_space[32];  /* 8*16 bytes for each XMM-reg = 128 bytes */
+  long int st_space[32];        /* 8*16 bytes for each FP-reg = 128 bytes */
+  long int xmm_space[32];       /* 8*16 bytes for each XMM-reg = 128 bytes */
   long int padding[56];
 };
 
index e60a49a4ea8b2b0d5324ed7bda462585cdfbbd05..b022f11b3901a1cca7249e3a5f46ef2d7f534029 100644 (file)
@@ -31,7 +31,8 @@ typedef long int clockid_t;
 typedef long int time_t;
 #endif
 
-struct tm {
+struct tm
+{
   int tm_sec;
   int tm_min;
   int tm_hour;
@@ -59,7 +60,7 @@ int clock_gettime (clockid_t clk_id, struct timespec *tp);
 struct tm *localtime (time_t const *timep);
 struct tm *gmtime (time_t const *time);
 
-time_t time (time_t *tloc);
+time_t time (time_t * tloc);
 
 #endif // ! WITH_GLIBC
 
index 8810cbf493e9f3ede1632336acda868cc7daaf3e..d0bb2ef8f2f1db9b92a977e51003fd7bab64ec06 100644 (file)
@@ -78,9 +78,9 @@ off_t lseek (int fd, off_t offset, int whence);
 ssize_t read (int fd, void *buffer, size_t size);
 #if __SBRK_CHAR_PTRDIFF
 /* xmalloc in binutils <= 2.10.1 uses this old prototype */
-char * sbrk (ptrdiff_t delta);
+char *sbrk (ptrdiff_t delta);
 #else
-void * sbrk (intptr_t delta);
+void *sbrk (intptr_t delta);
 #endif
 int unlink (char const *file_name);
 ssize_t write (int filedes, void const *buffer, size_t size);
index c72177bd89fbae1e9f3f7a7ecb98ba4b32559c62..428410ba738cd1f139c5e4bb76610b9e6b1fe91c 100644 (file)
@@ -1,5 +1,5 @@
 void
-assert_fail (chars)
+assert_fail (char *s)
 {
   eputs ("assert fail: ");
   eputs (s);
index 923eedcc348c266d79f4ed16bd56482e6af8352b..46adb74daf7840b46f21554db18ad72c74c0efd8 100644 (file)
@@ -26,7 +26,7 @@
 #include <unistd.h>
 
 int
-__getdirentries (int filedes, char *buffer, size_t nbytes, off_t *basep)
+__getdirentries (int filedes, char *buffer, size_t nbytes, off_t * basep)
 {
   if (basep)
     *basep = lseek (filedes, (off_t) 0, SEEK_CUR);
index 743778ef32f1fd300357e47878c375c3ab5034e2..325e6920b250fdb23edfdd51f9155347f7c49c04 100644 (file)
@@ -37,7 +37,7 @@
 /* Close the directory stream DIRP.
    Return 0 if successful, -1 if not.  */
 int
-closedir (DIR *dirp)
+closedir (DIR * dirp)
 {
   int filedes;
 
index c0a75c589f5996d20ef370397f20ad2b36c1f0b4..25b77e3d1bc2d0b659143c0d2e6512e61b43bc13 100644 (file)
@@ -47,12 +47,12 @@ opendir (char const *name)
   if (name[0] == '\0')
     {
       /* POSIX.1-1990 says an empty name gets ENOENT;
-        but `open' might like it fine.  */
+         but `open' might like it fine.  */
       errno = ENOENT;
       return 0;
     }
 
-  fd = open (name, O_RDONLY|O_DIRECTORY);
+  fd = open (name, O_RDONLY | O_DIRECTORY);
   if (fd < 0)
     return 0;
 
index b8783977f65bc41a6f8bf8231e0093f0135f94e1..3f38d044f0c80de2ca31167c6ebb4fd823f4d070 100644 (file)
@@ -34,7 +34,7 @@
 
 /* Read a directory entry from DIRP.  */
 struct dirent *
-readdir (DIR *dirp)
+readdir (DIR * dirp)
 {
   struct dirent *dp;
   int saved_errno = errno;
@@ -44,33 +44,33 @@ readdir (DIR *dirp)
       size_t reclen;
 
       if (dirp->offset >= dirp->size)
-       {
-         /* We've emptied out our buffer.  Refill it.  */
+        {
+          /* We've emptied out our buffer.  Refill it.  */
 
-         size_t maxread;
-         ssize_t bytes;
+          size_t maxread;
+          ssize_t bytes;
 
-         maxread = dirp->allocation;
+          maxread = dirp->allocation;
 
 #if 0
-         off_t base;
-         bytes = __getdirentries (dirp->fd, dirp->data, maxread, &base);
+          off_t base;
+          bytes = __getdirentries (dirp->fd, dirp->data, maxread, &base);
 #else
           bytes = getdents (dirp->fd, dirp->data, maxread);
 #endif
-         if (bytes <= 0)
-           {
-             /* Don't modifiy errno when reaching EOF.  */
-             if (bytes == 0)
+          if (bytes <= 0)
+            {
+              /* Don't modifiy errno when reaching EOF.  */
+              if (bytes == 0)
                 errno = saved_errno;
-             dp = 0;
-             break;
-           }
-         dirp->size = (size_t) bytes;
+              dp = 0;
+              break;
+            }
+          dirp->size = (size_t) bytes;
 
-         /* Reset the offset into the buffer.  */
-         dirp->offset = 0;
-       }
+          /* Reset the offset into the buffer.  */
+          dirp->offset = 0;
+        }
 
       dp = (struct dirent *) &dirp->data[dirp->offset];
 
@@ -79,7 +79,8 @@ readdir (DIR *dirp)
       dirp->filepos = dp->d_off;
 
       /* Skip deleted files.  */
-    } while (dp->d_ino == 0);
+    }
+  while (dp->d_ino == 0);
 
   return dp;
 }
index d7bdac91f7545079fa2cdfc75e6203a7775dd21a..528d1c451b8607333b243395c99bbba4731da230 100644 (file)
@@ -57,7 +57,7 @@ mes_open (char const *file_name, int flags, int mask)
   if (r > 2)
     __ungetc_buf[r] = -1;
   return r;
- }
+}
 
 #include <mes/eputs.c>
 #include <mes/oputs.c>
index 64e2ce4c80f4097cb3bba61387c7b6e973e8a001..abdc701fddec9f60d0bee9198c7ea26444f8728b 100644 (file)
@@ -27,7 +27,7 @@ __divdi3 (double a, double b)
   if (__mes_debug () && !stub)
     eputs ("__divdi3 stub\n");
   stub = 1;
-  return ((int)a / (int)b);
+  return ((int) a / (int) b);
 }
 
 double
@@ -37,7 +37,7 @@ __moddi3 (double a, double b)
   if (__mes_debug () && !stub)
     eputs ("__moddi3 stub\n");
   stub = 1;
-  return ((int) a %(int)b);
+  return ((int) a % (int) b);
 }
 
 unsigned long long
@@ -120,7 +120,7 @@ long
 int
 #else // !__TINYCC_
 long long
-#endif // !__TINYCC_
+#endif                          // !__TINYCC_
 __fixdfdi (double a1)
 {
   static int stub = 0;
index 22907808210455b077747a1da11a0dcabb819b97..e064f4604c831c842886e739bddddf40782c3b4a 100644 (file)
@@ -21,5 +21,5 @@
 int
 access (char const *file_name, int how)
 {
-  return _sys_call2 (SYS_access, (long)file_name, (int)how);
+  return _sys_call2 (SYS_access, (long) file_name, (int) how);
 }
index e727e73e3d9199833998879f620e25769724bbb1..2d880218683324f3feee6b43ddc73dc22589d367 100644 (file)
@@ -21,5 +21,5 @@
 long
 brk (void *addr)
 {
-  return _sys_call1 (SYS_brk, (long)addr);
+  return _sys_call1 (SYS_brk, (long) addr);
 }
index 43d522cf7410c10568107269e9c58aad629f35b1..12f2e2e45dc9ca4e63be155fce8d9d40ff84c0c3 100644 (file)
@@ -21,5 +21,5 @@
 int
 chdir (char const *file_name)
 {
-  return _sys_call1 (SYS_chdir, (long)file_name);
+  return _sys_call1 (SYS_chdir, (long) file_name);
 }
index a2380f78e61b2979ebbe0cb8b9506aefeb4ce92f..6a7e76a5078cf32f8903afcc1025a957aeeaf000 100644 (file)
@@ -21,5 +21,5 @@
 int
 chmod (char const *file_name, mode_t mask)
 {
-  return _sys_call2 (SYS_chmod, (long)file_name, (long)mask);
+  return _sys_call2 (SYS_chmod, (long) file_name, (long) mask);
 }
index a23572eb458bc4c7f77b657826164a9f98d2ce34..ee6a385e0221eeeb57519b2f6f1ebbe9c03b3f63 100644 (file)
@@ -23,5 +23,5 @@
 int
 clock_gettime (clockid_t clk_id, struct timespec *tp)
 {
-  return _sys_call2 (SYS_clock_gettime, (long)clk_id, (long)tp);
+  return _sys_call2 (SYS_clock_gettime, (long) clk_id, (long) tp);
 }
index 7876169e77dd88c37a7942b2c0df971e6a50b969..591031b7416a0649e1309df4d7ce085eb406b5ae 100644 (file)
@@ -23,5 +23,5 @@ close (int filedes)
 {
   if (filedes > 2)
     __ungetc_buf[filedes] = -1;
-  return _sys_call1 (SYS_close, (int)filedes);
+  return _sys_call1 (SYS_close, (int) filedes);
 }
index f7c8c5127154e79c0d974c10496f89970c6264b5..5a5bd5d0d8fc30f7961952d8a7ff48e5859d37a0 100644 (file)
@@ -21,5 +21,5 @@
 int
 dup (int old)
 {
-  return _sys_call1 (SYS_dup, (int)old);
+  return _sys_call1 (SYS_dup, (int) old);
 }
index 36cf5460f35e9943057801e73cccbb4d81b00159..c93fdbd2d248746f876ebeed1430bfafe52e19cc 100644 (file)
@@ -21,5 +21,5 @@
 int
 dup2 (int old, int new)
 {
-  return _sys_call2 (SYS_dup2, (int)old, (int)new);
+  return _sys_call2 (SYS_dup2, (int) old, (int) new);
 }
index fe747322305e11778437a9e7aa6914f316c458ef..477ada9295a086895e91912f2058c47814353a1e 100644 (file)
@@ -19,7 +19,7 @@
  */
 
 int
-execve (char constfile_name, char *const argv[], char *const env[])
+execve (char const *file_name, char *const argv[], char *const env[])
 {
-  return _sys_call3 (SYS_execve, (long)file_name, (long)argv, (long)env);
+  return _sys_call3 (SYS_execve, (long) file_name, (long) argv, (long) env);
 }
index 3fb291b765dd68efef8ce6e4e74c5b50008d4eca..c923a3dc180254a01d18b2d96ce962a93cb20163 100644 (file)
@@ -24,7 +24,7 @@ fcntl (int filedes, int command, ...)
   va_list ap;
   va_start (ap, command);
   int data = va_arg (ap, int);
-  int r = _sys_call3 (SYS_fcntl, (int)filedes, (int)command, (int)data);
+  int r = _sys_call3 (SYS_fcntl, (int) filedes, (int) command, (int) data);
   va_end (ap);
   return r;
 }
index 48aabcab261050e7643d1e2206d56b68ce4f0ae5..ca31e184974f702d4d15359493a51d947ccf683b 100644 (file)
@@ -21,5 +21,5 @@
 int
 fstat (int filedes, struct stat *statbuf)
 {
-  return _sys_call2 (SYS_fstat, (int)filedes, (long)statbuf);
+  return _sys_call2 (SYS_fstat, (int) filedes, (long) statbuf);
 }
index afe126935bb2727ecc56bff6510cf2e4b71d5aa9..7a584de1b739cea00a6d9d57ab7908c6af7ca9f3 100644 (file)
@@ -21,5 +21,5 @@
 int
 fsync (int filedes)
 {
-  return _sys_call1 (SYS_fsync, (int)filedes);
+  return _sys_call1 (SYS_fsync, (int) filedes);
 }
index 91ded19e5b6e8b645c19ff1c562e03f7443820f8..847a6dcfa102432abd5d6a5b713d7321cb1c01e9 100644 (file)
@@ -21,7 +21,7 @@
 char *
 _getcwd (char *buffer, size_t size)
 {
-  int r = _sys_call2 (SYS_getcwd, (long)buffer, (long)size);
+  int r = _sys_call2 (SYS_getcwd, (long) buffer, (long) size);
   if (r >= 0)
     return buffer;
   return 0;
index e4b1dda4e7ca01b156979f4e745ca8ac6ad9e6f0..16a5567cf8b8b6f41a3efc861540094b3d6703f4 100644 (file)
@@ -21,5 +21,5 @@
 int
 getdents (int filedes, char *buffer, size_t nbytes)
 {
-  return _sys_call3 (SYS_getdents, (int)filedes, (long)buffer, (long)nbytes);
+  return _sys_call3 (SYS_getdents, (int) filedes, (long) buffer, (long) nbytes);
 }
index 56aaf208800e254c637d9053a2bb67dbd7f22928..b9e84611537273a81e93a6a557158f1703bbf010 100644 (file)
@@ -21,5 +21,5 @@
 int
 getrusage (int processes, struct rusage *rusage)
 {
-  return _sys_call2 (SYS_getrusage, (int)processes, (long)rusage);
+  return _sys_call2 (SYS_getrusage, (int) processes, (long) rusage);
 }
index 81cf0fc05365c03b0b27cf3b555b0c21e6b8e0c4..6cef56538bc544752118594abb39f7a355286f2a 100644 (file)
@@ -23,5 +23,5 @@
 int
 gettimeofday (struct timeval *tv, struct timezone *tz)
 {
-  return _sys_call2 (SYS_gettimeofday, (long)tv, (long)tz);
+  return _sys_call2 (SYS_gettimeofday, (long) tv, (long) tz);
 }
index 9c9dfede4f5bea0a82043392029f78105d86e357..8b4f9faecf17eed9a0de85e1e2205f7fb3115ccb 100644 (file)
@@ -24,7 +24,7 @@ ioctl (int filedes, unsigned long command, ...)
   va_list ap;
   va_start (ap, command);
   int data = va_arg (ap, int);
-  int r = _sys_call3 (SYS_ioctl, (int)filedes, (long)command, (int)data);
+  int r = _sys_call3 (SYS_ioctl, (int) filedes, (long) command, (int) data);
   va_end (ap);
   return r;
 }
index 4aeeeeb3df89f7ddc6fb9e12bf653a652602a3a4..174886ba136500648078f2a0999fdf27eac3479e 100644 (file)
@@ -21,5 +21,5 @@
 int
 kill (pid_t pid, int signum)
 {
-  return _sys_call2 (SYS_kill, (long)pid, (long)signum);
+  return _sys_call2 (SYS_kill, (long) pid, (long) signum);
 }
index 7d9893b7d069ce1cf3d771b94cb0e2550acefbd6..2b13af0ec274bdf2af1e08703ceba61fa5d1f984 100644 (file)
@@ -21,5 +21,5 @@
 int
 link (char const *old_name, char const *new_name)
 {
-  return _sys_call2 (SYS_link, (long)old_name, (long)new_name);
+  return _sys_call2 (SYS_link, (long) old_name, (long) new_name);
 }
index 7f6fc85a70a8ffa6977d27907bfeb404418bce0b..ca673133dc9db67334e8aacb1556da5723e206e3 100644 (file)
@@ -21,5 +21,5 @@
 off_t
 lseek (int filedes, off_t offset, int whence)
 {
-  return _sys_call3 (SYS_lseek, (int)filedes, (long)offset, (int)whence);
+  return _sys_call3 (SYS_lseek, (int) filedes, (long) offset, (int) whence);
 }
index c3ca9cbffe4e16bd10c21a842d7e36ca940a87be..c091181bf7e0e56f2e76e8033e52768a3f967524 100644 (file)
@@ -21,5 +21,5 @@
 int
 lstat (char const *file_name, struct stat *statbuf)
 {
-  return _sys_call2 (SYS_lstat, (long)file_name, (long)statbuf);
+  return _sys_call2 (SYS_lstat, (long) file_name, (long) statbuf);
 }
index 1f5a1af1c899880227dcd4d1e8f7f9f958df4009..cadb60c809e9ef9533ca13df14b17b33f5b54bfc 100644 (file)
@@ -21,5 +21,5 @@
 int
 mkdir (char const *file_name, mode_t mode)
 {
-  return _sys_call2 (SYS_mkdir, (long)file_name, (long)mode);
+  return _sys_call2 (SYS_mkdir, (long) file_name, (long) mode);
 }
index f5c02b45475ac7f44ca0072452d0d8766e7e4628..0172b2009444babc8d03ec19656ccd0fd15d6ffa 100644 (file)
@@ -19,8 +19,7 @@
  */
 
 int
-nanosleep (const struct timespec *requested_time,
-           struct timespec *remaining)
+nanosleep (const struct timespec *requested_time, struct timespec *remaining)
 {
-  return _sys_call2 (SYS_nanosleep, (long)requested_time, (long)remaining);
+  return _sys_call2 (SYS_nanosleep, (long) requested_time, (long) remaining);
 }
index 5eca8c35e5df33ef22078bb374ade1d9b2a81bdf..951e50ed8101a237a6e7a278d8359878b8f35b0e 100644 (file)
@@ -21,7 +21,7 @@
 int
 _open3 (char const *file_name, int flags, int mask)
 {
-  int r = _sys_call3 (SYS_open, (long)file_name, (int)flags, (int)mask);
+  int r = _sys_call3 (SYS_open, (long) file_name, (int) flags, (int) mask);
   __ungetc_init ();
   if (r > 2)
     __ungetc_buf[r] = -1;
index ba510660aceb5cc687d48c0ec5fdd3af657c2588..4fbfd4ad044733aa0af76e4ccb9c7ad7785970f0 100644 (file)
@@ -21,5 +21,5 @@
 int
 pipe (int filedes[2])
 {
-  return _sys_call1 (SYS_pipe, (long)filedes);
+  return _sys_call1 (SYS_pipe, (long) filedes);
 }
index 8547a6cae1c15ab453309b45e1b772584628047e..9c3917c2e1e5cb4db0336b414b714c06a80ad6aa 100644 (file)
 ssize_t
 read (int filedes, void *buffer, size_t size)
 {
-  ssize_t bytes = _sys_call3 (SYS_read, (int)filedes, (long)buffer, (long)size);
+  ssize_t bytes = _sys_call3 (SYS_read, (int) filedes, (long) buffer, (long) size);
   if (__mes_debug () > 3)
     {
       if (bytes == 1)
         {
-          eputs ("read fd="); eputs (itoa ((int)filedes)); eputs (" c="); eputc (*(char*)buffer); eputs ("\n");
+          eputs ("read fd=");
+          eputs (itoa ((int) filedes));
+          eputs (" c=");
+          eputc (*(char *) buffer);
+          eputs ("\n");
         }
       else
         {
-          eputs ("read fd="); eputs (itoa ((int)filedes));
-          eputs (" bytes="); eputs (itoa (bytes)); eputs ("\n");
+          eputs ("read fd=");
+          eputs (itoa ((int) filedes));
+          eputs (" bytes=");
+          eputs (itoa (bytes));
+          eputs ("\n");
         }
     }
   return bytes;
index 56a8a5b9ba382df25ba385c130dc20cc385a498a..6acc00a5d2496ee1cd42eb7e4fc389c2437c96d4 100644 (file)
@@ -21,5 +21,5 @@
 int
 rename (char const *old_name, char const *new_name)
 {
-  return _sys_call2 (SYS_rename, (long)old_name, (long)new_name);
+  return _sys_call2 (SYS_rename, (long) old_name, (long) new_name);
 }
index ab95d2315d7bacff9ab0c9e2dda91fdfd6f40a91..e923b853dd9453ddd8e57a99695da513aa7610bd 100644 (file)
@@ -21,5 +21,5 @@
 int
 rmdir (char const *file_name)
 {
-  return _sys_call1 (SYS_rmdir, (long)file_name);
+  return _sys_call1 (SYS_rmdir, (long) file_name);
 }
index 9b11e0a98c77db3c9b625d03d2da407a058c8fa6..468be9ccd44914708ac1013a4c90829649b4fbb1 100644 (file)
@@ -21,5 +21,5 @@
 int
 setgid (gid_t newgid)
 {
-  return _sys_call1 (SYS_setgid, (long)newgid);
+  return _sys_call1 (SYS_setgid, (long) newgid);
 }
index 28fd3c9e14412dde55c8f61d647e80deda9268b6..6ca2ac2c73347e582b0553ab0717e03ac68bbde5 100644 (file)
@@ -19,8 +19,7 @@
  */
 
 int
-setitimer (int which, struct itimerval const *new,
-          struct itimerval *old)
+setitimer (int which, struct itimerval const *new, struct itimerval *old)
 {
-  return _sys_call3 (SYS_setitimer, (long)which, (long)new, (long)old);
+  return _sys_call3 (SYS_setitimer, (long) which, (long) new, (long) old);
 }
index 33a7330325f132388e57ac38bf37668e153ef14e..7d317816e344532113d3507321882984559b9c5c 100644 (file)
@@ -21,5 +21,5 @@
 int
 setuid (uid_t newuid)
 {
-  return _sys_call1 (SYS_setuid, (long)newuid);
+  return _sys_call1 (SYS_setuid, (long) newuid);
 }
index 72b66512660eb6cf77725b90ea2f983c896d4a2c..3e33ada814adf1e0983cdbd5b30978f0f657433a 100644 (file)
@@ -35,8 +35,8 @@ signal (int signum, sighandler_t action)
 #if __i386__
   return _sys_call2 (SYS_signal, signum, action);
 #else
-  static struct sigaction setup_action = {-1};
-  static struct sigaction old = {0};
+  static struct sigaction setup_action = { -1 };
+  static struct sigaction old = { 0 };
 
   setup_action.sa_handler = action;
   setup_action.sa_restorer = _restorer;
index 13ae60cf08542931764b718a4652a4dce6c52a95..40d9ff41ab06543f5fe3d38f6a6f78bfad487175 100644 (file)
  */
 
 int
-sigprocmask (int how, sigset_t const *set, sigset_t *oldset)
+sigprocmask (int how, sigset_t const *set, sigset_t * oldset)
 {
 #if __i386__
-  return _sys_call3 (SYS_sigprocmask, (long)how, (long)set, (long)oldset);
+  return _sys_call3 (SYS_sigprocmask, (long) how, (long) set, (long) oldset);
 #else
-  return _sys_call3 (SYS_rt_sigprocmask, (long)how, (long)set, (long)oldset);
+  return _sys_call3 (SYS_rt_sigprocmask, (long) how, (long) set, (long) oldset);
 #endif
 }
index 3f9e43c48aadfbbd1a7cf43e5ea5536e1c3fd87c..d34c73d82ffb1cbe7ae21c83e11221e005dffd6e 100644 (file)
@@ -21,5 +21,5 @@
 int
 stat (char const *file_name, struct stat *statbuf)
 {
-  return _sys_call2 (SYS_stat, (long)file_name, (long)statbuf);
+  return _sys_call2 (SYS_stat, (long) file_name, (long) statbuf);
 }
index 863a13c9b30cac8d8640ed44c45cbeb31c06e961..1b4acc520f20445e778ab9b89bebd9d1678e9c52 100644 (file)
@@ -21,7 +21,7 @@
 #include <time.h>
 
 time_t
-time (time_t *result)
+time (time_t * result)
 {
-  return _sys_call1 (SYS_time, (long)result);
+  return _sys_call1 (SYS_time, (long) result);
 }
index 989c198a3658f0a052eed9f9f18abe588fdcaa6b..97e6ef90c691ec9c9307ddb567ce5fe93acc888c 100644 (file)
@@ -21,5 +21,5 @@
 int
 unlink (char const *file_name)
 {
-  return _sys_call1 (SYS_unlink, (long)file_name);
+  return _sys_call1 (SYS_unlink, (long) file_name);
 }
index 048a5ac8c28d4e5a3d2fb8332b79aa8aa80e158c..3d3aa0bbf4384ddd615e8017898fcc12edbb7cdb 100644 (file)
@@ -22,9 +22,9 @@ pid_t
 waitpid (pid_t pid, int *status_ptr, int options)
 {
 #if __i386__
-  return _sys_call3 (SYS_waitpid, (long)pid, (long)status_ptr, (int)options);
+  return _sys_call3 (SYS_waitpid, (long) pid, (long) status_ptr, (int) options);
 #elif __x86_64__
-  return _sys_call4 (SYS_wait4, (long)pid, (long)status_ptr, (int)options, 0);
+  return _sys_call4 (SYS_wait4, (long) pid, (long) status_ptr, (int) options, 0);
 #else
 #error arch not supported
 #endif
index 6449a99d1034e36f2b404a4dade0eaf627dd9618..0161c93b739b75d7dc5773cef8c2521c9edb8c85 100644 (file)
@@ -33,8 +33,8 @@ _start ()
   asm ("mov____$i8,%rax !2");
   asm ("mov____%rax,0x32 &__stderr");
 
-#if 0 //MES_CCAMD64
-  asm ("add____$i32,%rbp %0x80"); // FIXME: corresponds to x86_64/as.scm function-preamble-fu
+#if 0                           //MES_CCAMD64
+  asm ("add____$i32,%rbp %0x80");       // FIXME: corresponds to x86_64/as.scm function-preamble-fu
 #endif
   asm ("mov____%rbp,%rax");
   asm ("add____$i8,%rax !8");
@@ -47,7 +47,7 @@ _start ()
 
   // FIXME: 64-bit addresses...
   asm ("mov____%rax,0x32 &environ");
-#if 0 //MES_CCAMD64
+#if 0                           //MES_CCAMD64
   asm ("mov____%rax,%rdx");     // amd
 #else
   asm ("push___%rax");          // bootstrap
@@ -55,7 +55,7 @@ _start ()
 
   asm ("mov____%rbp,%rax");
   asm ("add____$i8,%rax !16");
-#if 0 //MES_CCAMD64
+#if 0                           //MES_CCAMD64
   asm ("mov____%rax,%rsi");     // amd
 #else
   asm ("push___%rax");          // bootstrap
@@ -64,7 +64,7 @@ _start ()
   asm ("mov____%rbp,%rax");
   asm ("add____$i8,%rax !8");
   asm ("mov____(%rax),%rax");
-#if 0 //MES_CCAMD64
+#if 0                           //MES_CCAMD64
   asm ("mov____%rax,%rdi");     // amd
 #else
   asm ("push___%rax");          // bootstrap
index e87656b3b86bd7e1546b3ea138011e1751cd2cb4..cc64037b3aff7ec2a2a66f0cbac33f688ecd4b82 100644 (file)
@@ -25,7 +25,7 @@ long
 //__sys_call (long one, long two, long three, long four)
 __sys_call (long sys_call, long one, long two, long three, long four)
 {
-#if 1 // !MES_CCAMD64
+#if 1                           // !MES_CCAMD64
   // asm ("mov____0x8(%rbp),%rdi !0x10");
   // asm ("mov____0x8(%rbp),%rsi !0x18");
   // asm ("mov____0x8(%rbp),%rdx !0x20");
index c5816727b5234fae817f67a62b9872e2fcc65b58..15fcf244de116c888d42318c8d051d0c4c568da0 100644 (file)
@@ -21,7 +21,7 @@
 void
 _exit (int status)
 {
-#if 1 // !MES_CCAMD64
+#if 1                           // !MES_CCAMD64
   asm ("mov____0x8(%rbp),%rdi !0x10");
 #endif
 
@@ -32,7 +32,7 @@ _exit (int status)
 void
 _write (int filedes, void const *buffer, size_t size)
 {
-#if 1 // !MES_CCAMD64
+#if 1                           // !MES_CCAMD64
   asm ("mov____0x8(%rbp),%rdi !0x10");
   asm ("mov____0x8(%rbp),%rsi !0x18");
   asm ("mov____0x8(%rbp),%rdx !0x20");
index bc3997af15fedf627e0404602c04e252d5410bb6..8aa75207f454d26491edc97f2d62a2b58ed5f39c 100644 (file)
@@ -21,7 +21,7 @@
 #include <mes/lib.h>
 
 int
-eputs (char consts)
+eputs (char const *s)
 {
   int i = strlen (s);
   write (__stderr, s, i);
index 373474c691913dece1f4b4e4fd6428ce7a20c901..74dfb27be814d87c2706795f37e43d05e050fdf7 100644 (file)
 #include <limits.h>
 #include <sys/resource.h>
 
-int __ungetc_buf[RLIMIT_NOFILE+1] = {0};
+int __ungetc_buf[RLIMIT_NOFILE + 1] = { 0 };
 
 void
 __ungetc_init ()
 {
   if (__ungetc_buf[RLIMIT_NOFILE] == 0)
-    memset (__ungetc_buf, -1, (RLIMIT_NOFILE+1)*sizeof (int));
+    memset (__ungetc_buf, -1, (RLIMIT_NOFILE + 1) * sizeof (int));
 }
 
 int
@@ -46,7 +46,7 @@ fdgetc (int fd)
       if (r < 1)
         return -1;
       i = c;
-   }
+    }
   if (i < 0)
     i += 256;
 
index bd1eda43940460374fbce9dcbc1f90eff158cd43..0e68195b5383e65acc5c9c37f8c2fb78f55aa324 100644 (file)
@@ -23,6 +23,6 @@
 int
 fdputc (int c, int fd)
 {
-  write (fd, (char*)&c, 1);
+  write (fd, (char *) &c, 1);
   return 0;
 }
index 784fc0c5e56857133dd8cea91475b2139e26e4dc..73063dcb90ecb5d5cc87ccdb244df4a94b24d803 100644 (file)
@@ -21,7 +21,7 @@
 #include <mes/lib.h>
 
 int
-fdputs (char consts, int fd)
+fdputs (char const *s, int fd)
 {
   int i = strlen (s);
   write (fd, s, i);
index 26e60fe953d8ccfeed6a877ccf41f3c754bb6607..3166015f803cc9ac47c7b12976f43e4abefa6489 100644 (file)
@@ -36,14 +36,15 @@ ntoab (long x, int base, int signed_p)
     }
 
   do
-     {
-       long i = u % base;
-       *p-- = i > 9 ? 'a' + i - 10 : '0' + i;
-       u = u / base;
-     } while (u);
+    {
+      long i = u % base;
+      *p-- = i > 9 ? 'a' + i - 10 : '0' + i;
+      u = u / base;
+    }
+  while (u);
 
   if (sign && *(p + 1) != '0')
     *p-- = '-';
 
-  return p+1;
+  return p + 1;
 }
index 82731528d3163277e071d9310da94feee397590e..bcdf9d9836ddededdf4d50d7b6d748020fd39bbc 100644 (file)
@@ -21,7 +21,7 @@
 #include <mes/lib.h>
 
 int
-oputs (char consts)
+oputs (char const *s)
 {
   int i = strlen (s);
   write (__stdout, s, i);
index 035ac6c1140dcd837a9e5d6c83c6600fba030e16..8398babb78841b7ae99020b2601b53a093179678 100644 (file)
@@ -27,7 +27,9 @@ search_path (char const *file_name)
   char *path = getenv ("PATH");
   if (__mes_debug ())
     {
-      eputs ("\n search-path: "); eputs (file_name); eputs ("\n");
+      eputs ("\n search-path: ");
+      eputs (file_name);
+      eputs ("\n");
     }
   while (*path)
     {
@@ -38,7 +40,9 @@ search_path (char const *file_name)
       buf[end - path] = 0;
       if (__mes_debug ())
         {
-          eputs (" dir: "); eputs (buf); eputs ("\n");
+          eputs (" dir: ");
+          eputs (buf);
+          eputs ("\n");
         }
       if (buf[end - path] != '/')
         strcat (buf, "/");
@@ -47,7 +51,9 @@ search_path (char const *file_name)
         {
           if (__mes_debug ())
             {
-              eputs (" found: "); eputs (buf); eputs ("\n");
+              eputs (" found: ");
+              eputs (buf);
+              eputs ("\n");
             }
           return buf;
         }
index e5f89c1b8318dc967b9b17863129f0580d1e5b23..591825498feb42104e1026120dfd58ee39ead348 100644 (file)
@@ -26,9 +26,11 @@ execl (char const *file_name, char const *arg, ...)
 {
   if (__mes_debug () > 2)
     {
-      eputs ("execl "); eputs (file_name); eputs ("\n");
+      eputs ("execl ");
+      eputs (file_name);
+      eputs ("\n");
     }
-  char *argv[1000];           // POSIX minimum 4096
+  char *argv[1000];             // POSIX minimum 4096
   int i = 0;
 
   va_list ap;
@@ -42,7 +44,11 @@ execl (char const *file_name, char const *arg, ...)
       arg = va_arg (ap, char const *);
       if (__mes_debug () > 2)
         {
-          eputs ("arg["); eputs (itoa (i)); eputs ("]: "); eputs (argv[i-1]); eputs ("\n");
+          eputs ("arg[");
+          eputs (itoa (i));
+          eputs ("]: ");
+          eputs (argv[i - 1]);
+          eputs ("\n");
         }
     }
   argv[i] = 0;
index 74476d8a62b1773fea5081746aced4292e3cab86..bc801375128741a6b49fb9c3b8332f93c6ade447 100644 (file)
@@ -33,11 +33,17 @@ execvp (char const *file_name, char *const argv[])
     }
   if (__mes_debug ())
     {
-      eputs (" EXEC: "); eputs (file_name); eputs ("\n");
+      eputs (" EXEC: ");
+      eputs (file_name);
+      eputs ("\n");
       int i = 0;
       while (argv[i])
         {
-          eputs (" arg["); eputs (itoa (i)); eputs ("]: "); eputs (argv[i]); eputs ("\n");
+          eputs (" arg[");
+          eputs (itoa (i));
+          eputs ("]: ");
+          eputs (argv[i]);
+          eputs ("\n");
           i++;
         }
     }
index fdf42f5e185759b334c817fee2274fb532d1ac30..8b58d635c045b24187e6c9b602adecf8a655b3a9 100644 (file)
@@ -21,7 +21,7 @@
 #include <stdlib.h>
 
 char *
-getenv (char consts)
+getenv (char const *s)
 {
   char **p = environ;
   int length = strlen (s);
index 956a10524a5c0d1bd089ce58fb28c92f81455ffa..1a9d30d7de444da532531c0c8fb8c894f6c7d2cc 100644 (file)
@@ -58,8 +58,8 @@ static char *nextchar;
    for unrecognized options.  */
 
 int opterr = 1;
-
 \f
+
 /* Handle permutation of arguments.  */
 
 /* Describe the part of ARGV that contains non-options that have
@@ -68,8 +68,8 @@ int opterr = 1;
 
 static int first_nonopt;
 static int last_nonopt;
-
 \f
+
 /* Scan elements of ARGV (whose length is ARGC) for option characters
    given in OPTSTRING.
 
@@ -148,33 +148,30 @@ _getopt_internal (int argc, char *const
   if (nextchar == NULL || *nextchar == '\0')
     {
       /* If we have done all the ARGV-elements, stop the scan
-        and back over any non-options that we skipped and permuted.  */
+         and back over any non-options that we skipped and permuted.  */
 
       if (optind == argc)
-       {
-         /* Set the next-arg-index to point at the non-options
-            that we previously skipped, so the caller will digest them.  */
-         if (first_nonopt != last_nonopt)
-           optind = first_nonopt;
-         return EOF;
-       }
+        {
+          /* Set the next-arg-index to point at the non-options
+             that we previously skipped, so the caller will digest them.  */
+          if (first_nonopt != last_nonopt)
+            optind = first_nonopt;
+          return EOF;
+        }
 
       /* If we have come to a non-option and did not permute it,
-        either stop the scan or describe it to the caller and pass it by.  */
+         either stop the scan or describe it to the caller and pass it by.  */
 
       if ((argv[optind][0] != '-' || argv[optind][1] == '\0'))
         return EOF;
 
       /* We have found another option-ARGV-element.
-        Start decoding its characters.  */
+         Start decoding its characters.  */
 
-      nextchar = (argv[optind] + 1
-                 + (longopts != NULL && argv[optind][1] == '-'));
+      nextchar = (argv[optind] + 1 + (longopts != NULL && argv[optind][1] == '-'));
     }
 
-  if (longopts != NULL
-      && ((argv[optind][0] == '-'
-          && (argv[optind][1] == '-' || long_only))))
+  if (longopts != NULL && ((argv[optind][0] == '-' && (argv[optind][1] == '-' || long_only))))
     {
       const struct option *p;
       char *s = nextchar;
@@ -184,116 +181,109 @@ _getopt_internal (int argc, char *const
       int indfound;
 
       while (*s && *s != '=')
-       s++;
+        s++;
 
       /* Test all options for either exact match or abbreviated matches.  */
-      for (p = longopts, option_index = 0; p->name;
-          p++, option_index++)
-       if (!strncmp (p->name, nextchar, s - nextchar))
-         {
-           if (s - nextchar == strlen (p->name))
-             {
-               /* Exact match found.  */
-               pfound = p;
-               indfound = option_index;
-               exact = 1;
-               break;
-             }
-           else if (pfound == NULL)
-             {
-               /* First nonexact match found.  */
-               pfound = p;
-               indfound = option_index;
-             }
-           else
-             /* Second nonexact match found.  */
-             ambig = 1;
-         }
+      for (p = longopts, option_index = 0; p->name; p++, option_index++)
+        if (!strncmp (p->name, nextchar, s - nextchar))
+          {
+            if (s - nextchar == strlen (p->name))
+              {
+                /* Exact match found.  */
+                pfound = p;
+                indfound = option_index;
+                exact = 1;
+                break;
+              }
+            else if (pfound == NULL)
+              {
+                /* First nonexact match found.  */
+                pfound = p;
+                indfound = option_index;
+              }
+            else
+              /* Second nonexact match found.  */
+              ambig = 1;
+          }
 
       if (ambig && !exact)
-       {
-         if (opterr)
-           fprintf (stderr, "%s: option `%s' is ambiguous\n",
-                    argv[0], argv[optind]);
-         nextchar += strlen (nextchar);
-         optind++;
-         return '?';
-       }
+        {
+          if (opterr)
+            fprintf (stderr, "%s: option `%s' is ambiguous\n", argv[0], argv[optind]);
+          nextchar += strlen (nextchar);
+          optind++;
+          return '?';
+        }
 
       if (pfound != NULL)
-       {
-         option_index = indfound;
-         optind++;
-         if (*s)
-           {
-             /* Don't test has_arg with >, because some C compilers don't
-                allow it to be used on enums. */
-             if (pfound->has_arg)
-               optarg = s + 1;
-             else
-               {
-                 if (opterr)
-                   {
-                     if (argv[optind - 1][1] == '-')
-                       /* --option */
-                       fprintf (stderr,
-                                "%s: option `--%s' doesn't allow an argument\n",
-                                argv[0], pfound->name);
-                     else
-                       /* +option or -option */
-                       fprintf (stderr,
-                            "%s: option `%c%s' doesn't allow an argument\n",
-                            argv[0], argv[optind - 1][0], pfound->name);
-                   }
-                 nextchar += strlen (nextchar);
-                 return '?';
-               }
-           }
-         else if (pfound->has_arg == 1)
-           {
-             if (optind < argc)
-               optarg = argv[optind++];
-             else
-               {
-                 if (opterr)
-                   fprintf (stderr, "%s: option `%s' requires an argument\n",
-                            argv[0], argv[optind - 1]);
-                 nextchar += strlen (nextchar);
-                 return '?';
-               }
-           }
-         nextchar += strlen (nextchar);
-         if (longind != NULL)
-           *longind = option_index;
-         if (pfound->flag)
-           {
-             *(pfound->flag) = pfound->val;
-             return 0;
-           }
-         return pfound->val;
-       }
+        {
+          option_index = indfound;
+          optind++;
+          if (*s)
+            {
+              /* Don't test has_arg with >, because some C compilers don't
+                 allow it to be used on enums. */
+              if (pfound->has_arg)
+                optarg = s + 1;
+              else
+                {
+                  if (opterr)
+                    {
+                      if (argv[optind - 1][1] == '-')
+                        /* --option */
+                        fprintf (stderr,
+                                 "%s: option `--%s' doesn't allow an argument\n", argv[0], pfound->name);
+                      else
+                        /* +option or -option */
+                        fprintf (stderr,
+                                 "%s: option `%c%s' doesn't allow an argument\n",
+                                 argv[0], argv[optind - 1][0], pfound->name);
+                    }
+                  nextchar += strlen (nextchar);
+                  return '?';
+                }
+            }
+          else if (pfound->has_arg == 1)
+            {
+              if (optind < argc)
+                optarg = argv[optind++];
+              else
+                {
+                  if (opterr)
+                    fprintf (stderr, "%s: option `%s' requires an argument\n", argv[0], argv[optind - 1]);
+                  nextchar += strlen (nextchar);
+                  return '?';
+                }
+            }
+          nextchar += strlen (nextchar);
+          if (longind != NULL)
+            *longind = option_index;
+          if (pfound->flag)
+            {
+              *(pfound->flag) = pfound->val;
+              return 0;
+            }
+          return pfound->val;
+        }
       /* Can't find it as a long option.  If this is not getopt_long_only,
-        or the option starts with '--' or is not a valid short
-        option, then it's an error.
-        Otherwise interpret it as a short option. */
-      if (!long_only || argv[optind][1] == '-'
-         || strchr (optstring, *nextchar) == NULL)
-       {
-         if (opterr)
-           {
-             if (argv[optind][1] == '-')
-               /* --option */
-               fprintf (stderr, "%s: unrecognized option `--%s'\n",
-                        argv[0], nextchar);
-             else
-               /* +option or -option */
-               fprintf (stderr, "%s: unrecognized option `%c%s'\n",
-                        argv[0], argv[optind][0], nextchar);
-           }
-         nextchar += strlen (nextchar);
-         optind++;
-         return '?';
-       }
+         or the option starts with '--' or is not a valid short
+         option, then it's an error.
+         Otherwise interpret it as a short option. */
+      if (!long_only || argv[optind][1] == '-' || strchr (optstring, *nextchar) == NULL)
+        {
+          if (opterr)
+            {
+              if (argv[optind][1] == '-')
+                /* --option */
+                fprintf (stderr, "%s: unrecognized option `--%s'\n", argv[0], nextchar);
+              else
+                /* +option or -option */
+                fprintf (stderr, "%s: unrecognized option `%c%s'\n", argv[0], argv[optind][0], nextchar);
+            }
+          nextchar += strlen (nextchar);
+          optind++;
+          return '?';
+        }
     }
 
   /* Look at and handle the next option-character.  */
@@ -308,53 +298,51 @@ _getopt_internal (int argc, char *const
 
     if (temp == NULL || c == ':')
       {
-       if (opterr)
-         {
-           if (c < 040 || c >= 0177)
-             fprintf (stderr, "%s: unrecognized option, character code 0%o\n",
-                      argv[0], c);
-           else
-             fprintf (stderr, "%s: unrecognized option `-%c'\n", argv[0], c);
-         }
-       return '?';
+        if (opterr)
+          {
+            if (c < 040 || c >= 0177)
+              fprintf (stderr, "%s: unrecognized option, character code 0%o\n", argv[0], c);
+            else
+              fprintf (stderr, "%s: unrecognized option `-%c'\n", argv[0], c);
+          }
+        return '?';
       }
     if (temp[1] == ':')
       {
-       if (temp[2] == ':')
-         {
-           /* This is an option that accepts an argument optionally.  */
-           if (*nextchar != '\0')
-             {
-               optarg = nextchar;
-               optind++;
-             }
-           else
-             optarg = 0;
-           nextchar = NULL;
-         }
-       else
-         {
-           /* This is an option that requires an argument.  */
-           if (*nextchar != 0)
-             {
-               optarg = nextchar;
-               /* If we end this ARGV-element by taking the rest as an arg,
-                  we must advance to the next element now.  */
-               optind++;
-             }
-           else if (optind == argc)
-             {
-               if (opterr)
-                 fprintf (stderr, "%s: option `-%c' requires an argument\n",
-                          argv[0], c);
-               c = '?';
-             }
-           else
-             /* We already incremented `optind' once;
-                increment it again when taking next ARGV-elt as argument.  */
-             optarg = argv[optind++];
-           nextchar = NULL;
-         }
+        if (temp[2] == ':')
+          {
+            /* This is an option that accepts an argument optionally.  */
+            if (*nextchar != '\0')
+              {
+                optarg = nextchar;
+                optind++;
+              }
+            else
+              optarg = 0;
+            nextchar = NULL;
+          }
+        else
+          {
+            /* This is an option that requires an argument.  */
+            if (*nextchar != 0)
+              {
+                optarg = nextchar;
+                /* If we end this ARGV-element by taking the rest as an arg,
+                   we must advance to the next element now.  */
+                optind++;
+              }
+            else if (optind == argc)
+              {
+                if (opterr)
+                  fprintf (stderr, "%s: option `-%c' requires an argument\n", argv[0], c);
+                c = '?';
+              }
+            else
+              /* We already incremented `optind' once;
+                 increment it again when taking next ARGV-elt as argument.  */
+              optarg = argv[optind++];
+            nextchar = NULL;
+          }
       }
     return c;
   }
@@ -363,8 +351,7 @@ _getopt_internal (int argc, char *const
 int
 getopt (int argc, char *const *argv, char const *options)
 {
-  return _getopt_internal (argc, argv, options,
-                           (const struct option *) 0, (int *) 0, 0);
+  return _getopt_internal (argc, argv, options, (const struct option *) 0, (int *) 0, 0);
 }
 
 int
index 0c7e5164aec04f2d554269c1146efb01eafb175b..8226b5f99e142ff228a8a19bd4399aa497964b05 100644 (file)
@@ -24,12 +24,12 @@ char *
 mktemp (char *template)
 {
   char *p = strchr (template, '\0');
-  int q = (long)template;
-  *--p = ((unsigned char)(q >> 4)) % 26 + 'a';
-  *--p = ((unsigned char)(q >> 8)) % 26 + 'a';
-  *--p = ((unsigned char)(q >> 12)) % 26 + 'a';
-  *--p = ((unsigned char)(q >> 16)) % 26 + 'a';
-  *--p = ((unsigned char)(q >> 20)) % 26 + 'a';
-  *--p = ((unsigned char)(q >> 24)) % 26 + 'a';
+  int q = (long) template;
+  *--p = ((unsigned char) (q >> 4)) % 26 + 'a';
+  *--p = ((unsigned char) (q >> 8)) % 26 + 'a';
+  *--p = ((unsigned char) (q >> 12)) % 26 + 'a';
+  *--p = ((unsigned char) (q >> 16)) % 26 + 'a';
+  *--p = ((unsigned char) (q >> 20)) % 26 + 'a';
+  *--p = ((unsigned char) (q >> 24)) % 26 + 'a';
   return template;
 }
index ecaac2c4540229247bc0d9d569097bc3d211fb20..c8de60870c6ec82b4f43590ad1d082e63dc335ae 100644 (file)
@@ -21,7 +21,7 @@
 #include <stdlib.h>
 
 int
-setenv (char const* s, char const* v, int overwrite_p)
+setenv (char const *s, char const *v, int overwrite_p)
 {
   char **p = environ;
   int length = strlen (s);
index a9bb1f4c0eed1ab1f13d9ad69eef28842bd4c9a4..5ec0f1c6dca85b34e4a453e7f80f6b4bd80a8153 100644 (file)
@@ -23,5 +23,5 @@
 pid_t
 wait (int *status_ptr)
 {
-  return waitpid  (-1, status_ptr, 0);
+  return waitpid (-1, status_ptr, 0);
 }
index 3be2ba9c5299645609ccf4b1ae405cebfe276a78..4c0729e9632364f4bf705decb7e4df54e943df15 100644 (file)
@@ -21,7 +21,7 @@
 #include <stdio.h>
 
 void
-clearerr (FILE *stream)
+clearerr (FILE * stream)
 {
   errno = 0;
 }
index 29192de23163489d2572e714ddaa0a243ccea7a2..04ffbfa835e864673d646413a688c2025d466a2d 100644 (file)
@@ -21,8 +21,8 @@
 #include <stdio.h>
 
 int
-fclose (FILE *stream)
+fclose (FILE * stream)
 {
-  int fd = (int)stream;
+  int fd = (int) stream;
   return close (fd);
 }
index eb39d7c270234bb14d1f20d3d5542167b3e8a862..4be1adcd3d9f8e47204703d74a3dcec719927bc0 100644 (file)
@@ -23,5 +23,5 @@
 FILE *
 fdopen (int fd, char const *mode)
 {
-  return (FILE*)fd;
+  return (FILE *) fd;
 }
index 0e7149fd9c06f6902009c2c4da5d96d6b1b7db0c..581dfb4c54a0daf4caf683c439772f90ccd856cb 100644 (file)
@@ -21,7 +21,7 @@
 #include <stdio.h>
 
 int
-feof (FILE *stream)
+feof (FILE * stream)
 {
   char c = fgetc (stream);
   if (c != EOF)
index 4e5582de3f8ceaca0858e11060fe24b8000da119..009f48b9c68e5aa3a31391c932ccd7cb5731622b 100644 (file)
@@ -21,9 +21,9 @@
 #include <stdio.h>
 
 int
-ferror (FILE *stream)
+ferror (FILE * stream)
 {
-  int fd = (int)stream;
+  int fd = (int) stream;
   if (fd == -1)
     return -1;
   return 0;
index c92587ebcc63b087efc8d6cf4897c3afd109fbea..3951bf1f81152b99c36ccf522fb838b9fdeba8a1 100644 (file)
@@ -21,7 +21,7 @@
 #include <stdio.h>
 
 int
-fflush (FILE *stream)
+fflush (FILE * stream)
 {
-  fsync ((int)stream);
+  fsync ((int) stream);
 }
index 83f2589cb297d2fed464787d894080e984a2ad09..0bca3f885d45a1bb64f484c79f6726192188b1e1 100644 (file)
@@ -21,7 +21,7 @@
 #include <stdio.h>
 
 int
-fgetc (FILE *stream)
+fgetc (FILE * stream)
 {
-  return fdgetc ((long)stream);
+  return fdgetc ((long) stream);
 }
index fb6d5f7791fff179fcd657978aefc073551ce662..1635d5ab95d396ead6c31c2dea7d6375cfd92577 100644 (file)
@@ -21,7 +21,7 @@
 #include <stdio.h>
 
 char *
-fgets (char *s, int count, FILE *stream)
+fgets (char *s, int count, FILE * stream)
 {
-  return fdgets (s, count, (int)stream);
+  return fdgets (s, count, (int) stream);
 }
index f5fe98eeda34b10bf497d2c05c974673e594d450..971f0667c3c2c48a5fff98a7925b57c8d2c8eb61 100644 (file)
@@ -21,7 +21,7 @@
 #include <stdio.h>
 
 int
-fileno (FILE *stream)
+fileno (FILE * stream)
 {
-  return (int)stream;
+  return (int) stream;
 }
index 05ec8bbf3fe187a3f2d9a947d941e2f3a579d108..68f23e5834111e7c2d74b2737b4fd2c0d0e49f3b 100644 (file)
 #define open _open3
 #endif
 
-FILE*
+FILE *
 fopen (char const *file_name, char const *opentype)
 {
   if (__mes_debug ())
     {
-      eputs ("fopen "); eputs (file_name);
-      eputs (" "); eputs (opentype); eputs ("\n");
+      eputs ("fopen ");
+      eputs (file_name);
+      eputs (" ");
+      eputs (opentype);
+      eputs ("\n");
     }
 
   int fd;
   int mode = 0600;
-  if ((opentype[0] == 'a' || !strcmp (opentype, "r+"))
-      && !access (file_name, O_RDONLY))
+  if ((opentype[0] == 'a' || !strcmp (opentype, "r+")) && !access (file_name, O_RDONLY))
     {
       int flags = O_RDWR;
       if (opentype[0] == 'a')
@@ -58,7 +60,9 @@ fopen (char const *file_name, char const *opentype)
 
   if (__mes_debug ())
     {
-      eputs (" => fd="); eputs (itoa (fd)); eputs ("\n");
+      eputs (" => fd=");
+      eputs (itoa (fd));
+      eputs ("\n");
     }
 
   if (!fd)
@@ -68,7 +72,7 @@ fopen (char const *file_name, char const *opentype)
     }
   if (fd < 0)
     fd = 0;
-  return (FILE*)fd;
+  return (FILE *) fd;
 }
 
 #undef open
index 07e8c35a765555be0f8f2f635f78093465962930..c1ec5ceb204d08b4db8c8707e8d0b457b6e5b00d 100644 (file)
@@ -22,7 +22,7 @@
 #include <stdio.h>
 
 int
-fprintf (FILE *stream, char const *format, ...)
+fprintf (FILE * stream, char const *format, ...)
 {
   va_list ap;
   va_start (ap, format);
index 264a2af35c48d606c317f358515a72a94a99ed8d..232b534a1ca323549f46a533504b0064152b67af 100644 (file)
@@ -21,7 +21,7 @@
 #include <stdio.h>
 
 int
-fputc (int c, FILE* stream)
+fputc (int c, FILE * stream)
 {
-  return fdputc (c, (int)stream);
+  return fdputc (c, (int) stream);
 }
index 165f0d2f34a12cbf5d7a9022acd4e335c05efbfd..e4d913a4cc6cd16ae778b693d86dabaaafc0013f 100644 (file)
@@ -21,7 +21,7 @@
 #include <stdio.h>
 
 int
-fputs (char const* s, FILE* stream)
+fputs (char const *s, FILE * stream)
 {
-  return fdputs (s, (long)stream);
+  return fdputs (s, (long) stream);
 }
index 58a2c4c2126c3c093c662f496320c422cf444358..9b6f2e80dad5487ee2d9563a9afba96bc67c6d9a 100644 (file)
 #include <stdio.h>
 
 int
-_fungetc_p (FILE *stream)
+_fungetc_p (FILE * stream)
 {
-  return _fdungetc_p ((int)stream);
+  return _fdungetc_p ((int) stream);
 }
 
 size_t
-fread (void *data, size_t size, size_t count, FILE *stream)
+fread (void *data, size_t size, size_t count, FILE * stream)
 {
-  if (! size || !count)
+  if (!size || !count)
     return 0;
 
   size_t todo = size * count;
-  char *buf = (char*)data;
+  char *buf = (char *) data;
 
   int bytes = 0;
   while (_fungetc_p (stream) && todo-- && ++bytes)
     *buf++ = fgetc (stream);
   if (todo)
     {
-      int r = read ((int)stream, buf, todo);
+      int r = read ((int) stream, buf, todo);
       if (r < 0 && !bytes)
         bytes = r;
       else
@@ -50,19 +50,24 @@ fread (void *data, size_t size, size_t count, FILE *stream)
 
   if (__mes_debug ())
     {
-      eputs ("fread fd="); eputs (itoa ((int)stream));
-      eputs (" bytes="); eputs (itoa (bytes)); eputs ("\n");
+      eputs ("fread fd=");
+      eputs (itoa ((int) stream));
+      eputs (" bytes=");
+      eputs (itoa (bytes));
+      eputs ("\n");
       static char buf[4096];
       if (bytes > 0 && bytes < sizeof (buf))
         {
           strncpy (buf, data, bytes);
           buf[bytes] = 0;
-          eputs ("fread buf="); eputs (buf); eputs ("\n");
+          eputs ("fread buf=");
+          eputs (buf);
+          eputs ("\n");
         }
     }
 
   if (bytes > 0)
-    return bytes/size;
+    return bytes / size;
 
   return 0;
 }
index 757e48b8aa06af1c79908bc4a1e5a64052a0ec20..f9447a09341264c301999ccb94d1c8820617ee75 100644 (file)
@@ -21,7 +21,7 @@
 #include <stdio.h>
 
 FILE *
-freopen (char const *file_name, char const *opentype, FILE *stream)
+freopen (char const *file_name, char const *opentype, FILE * stream)
 {
   fclose (stream);
   return fopen (file_name, opentype);
index 757e48b8aa06af1c79908bc4a1e5a64052a0ec20..f9447a09341264c301999ccb94d1c8820617ee75 100644 (file)
@@ -21,7 +21,7 @@
 #include <stdio.h>
 
 FILE *
-freopen (char const *file_name, char const *opentype, FILE *stream)
+freopen (char const *file_name, char const *opentype, FILE * stream)
 {
   fclose (stream);
   return fopen (file_name, opentype);
index 281bfca0c70e78dd892fdc96d32b2aa147336549..62e5a4ff2489ab03fa596a526402fb1945d0209a 100644 (file)
 #include <stdio.h>
 
 int
-fseek (FILE *stream, long offset, int whence)
+fseek (FILE * stream, long offset, int whence)
 {
-  off_t pos = lseek ((int)stream, offset, whence);
+  off_t pos = lseek ((int) stream, offset, whence);
   if (__mes_debug ())
     {
-      eputs ("fread fd="); eputs (itoa ((int)stream));
-      eputs ("  =>"); eputs (itoa (pos)); eputs ("\n");
+      eputs ("fread fd=");
+      eputs (itoa ((int) stream));
+      eputs ("  =>");
+      eputs (itoa (pos));
+      eputs ("\n");
     }
   if (pos >= 0)
     return 0;
index 4d1fab0448d4ba84abe3f55e520720f4559b4f6d..8bdac53a04f97c3042e874464d8883398adada18 100644 (file)
@@ -21,7 +21,7 @@
 #include <stdio.h>
 
 long
-ftell (FILE *stream)
+ftell (FILE * stream)
 {
-  return lseek ((int)stream, 0, SEEK_CUR);
+  return lseek ((int) stream, 0, SEEK_CUR);
 }
index 533f3fd34c1978dbe38c22bdb5b8fb9cd797505d..744877589ae0598f3c97dd18f08d023a996bce09 100644 (file)
 #include <stdio.h>
 
 size_t
-fwrite (void const *data, size_t size, size_t count, FILE *stream)
+fwrite (void const *data, size_t size, size_t count, FILE * stream)
 {
   if (__mes_debug () > 1)
     {
-      eputs ("fwrite "); eputs (itoa ((int)stream));
-      eputs ("  "); eputs (itoa (size)); eputs ("\n");
+      eputs ("fwrite ");
+      eputs (itoa ((int) stream));
+      eputs ("  ");
+      eputs (itoa (size));
+      eputs ("\n");
     }
 
-  if (! size || !count)
+  if (!size || !count)
     return 0;
-  int bytes = write ((int)stream, data, size * count);
+  int bytes = write ((int) stream, data, size * count);
 
   if (__mes_debug () > 2)
     {
-      eputs (" => "); eputs (itoa (bytes)); eputs ("\n");
+      eputs (" => ");
+      eputs (itoa (bytes));
+      eputs ("\n");
     }
 
   if (bytes > 0)
-    return bytes/size;
+    return bytes / size;
   return 0;
 }
index c32ff7a170edfda223f9bb85d856147d11507727..25774aa22ef15c805489401df342b5ffab7855ce 100644 (file)
@@ -21,7 +21,7 @@
 #include <stdio.h>
 
 int
-getc (FILE *stream)
+getc (FILE * stream)
 {
-  return fdgetc ((long)stream);
+  return fdgetc ((long) stream);
 }
index 95ad3d4eca712f528397f8f56ec82a21afa671fd..879c9a644559b708af1d9f3957c4d7a074ef6757 100644 (file)
@@ -22,7 +22,7 @@
 #include <stdio.h>
 
 int
-printf (char constformat, ...)
+printf (char const *format, ...)
 {
   va_list ap;
   int r;
index 4c585767977b859199d3e94f56f0eb21e7ff9002..1cc2ed2871915e277830717f4f9bccffec26b272 100644 (file)
@@ -21,7 +21,7 @@
 #include <stdio.h>
 
 int
-putc (int c, FILE* stream)
+putc (int c, FILE * stream)
 {
-  return fdputc (c, (long)stream);
+  return fdputc (c, (long) stream);
 }
index 602e430ce45b47b85633694cc5b30abf4959b8e6..7bd5ef6361dab32b7338c8ad36186c3bd51b0b5e 100644 (file)
@@ -23,6 +23,6 @@
 int
 putchar (int c)
 {
-  write (STDOUT, (char*)&c, 1);
+  write (STDOUT, (char *) &c, 1);
   return 0;
 }
index 8afb1fc2e19ccabfe22765610d9f56cfcdb054fd..f62da34194b591a7e19f1371e45690556f0d028b 100644 (file)
@@ -22,7 +22,7 @@
 #include <stdio.h>
 
 int
-snprintf (char *str,  size_t size,  char const *format, ...)
+snprintf (char *str, size_t size, char const *format, ...)
 {
   va_list ap;
   int r;
index 5edf9306e4956f8f3a70147578fa1cf4d725524b..6c130b15fa47eb1c186d62ed0f092bf911caf7bd 100644 (file)
@@ -22,7 +22,7 @@
 #include <stdio.h>
 
 int
-sprintf (char *str, char constformat, ...)
+sprintf (char *str, char const *format, ...)
 {
   va_list ap;
   int r;
index a107a9f680d34b7661455060ad1d9cfba20376a6..89109fc842b80014c45f02fffa4d4d6aa9d78c07 100644 (file)
@@ -21,7 +21,7 @@
 #include <stdio.h>
 
 int
-ungetc (int c, FILE *stream)
+ungetc (int c, FILE * stream)
 {
-  return fdungetc (c, (long)stream);
+  return fdungetc (c, (long) stream);
 }
index 2b251246ce5c410c8e992c94989c32c45a332cf6..00abe7a6f13b10c787d070b3a4bdb80f6196ad75 100644 (file)
@@ -24,9 +24,9 @@
 #include <string.h>
 
 int
-vfprintf (FILE* f, char const* format, va_list ap)
+vfprintf (FILE * f, char const *format, va_list ap)
 {
-  int fd = (long)f;
+  int fd = (long) f;
   char const *p = format;
   int count = 0;
   while (*p)
@@ -107,9 +107,7 @@ vfprintf (FILE* f, char const* format, va_list ap)
           case 'X':
             {
               long d = va_arg (ap, long);
-              int base = c == 'o' ? 8
-                : c == 'x' || c == 'X' ? 16
-                : 10;
+              int base = c == 'o' ? 8 : c == 'x' || c == 'X' ? 16 : 10;
               char const *s = ntoab (d, base, c != 'u' && c != 'x' && c != 'X');
               if (c == 'X')
                 strupr (s);
index 909d1faba58fdfa29596983c7e95cc06b966a5ee..ff9459431453c1af7a2751fab4f52a69de3bf89b 100644 (file)
@@ -22,7 +22,7 @@
 #include <stdio.h>
 
 int
-vprintf (char constformat, va_list ap)
+vprintf (char const *format, va_list ap)
 {
   return vfprintf (stdout, format, ap);
 }
index 2021227e646db19095c228cb2e1d261fd5014e1f..beec362a73165dcc489bc77f2871978a8a43910a 100644 (file)
@@ -23,7 +23,7 @@
 #include <string.h>
 
 int
-vsnprintf (char *str, size_t size, char constformat, va_list ap)
+vsnprintf (char *str, size_t size, char const *format, va_list ap)
 {
   char const *p = format;
   int count = 0;
@@ -112,9 +112,7 @@ vsnprintf (char *str, size_t size, char const* format, va_list ap)
           case 'X':
             {
               long d = va_arg (ap, long);
-              int base = c == 'o' ? 8
-                : c == 'x' || c == 'X' ? 16
-                : 10;
+              int base = c == 'o' ? 8 : c == 'x' || c == 'X' ? 16 : 10;
               char const *s = ntoab (d, base, c != 'u' && c != 'x' && c != 'X');
               if (c == 'X')
                 strupr (s);
index 8a65b0d6d25272262fa366f7a678febd813d8df7..caae3d659fc8af1c83b79ca4048269a866e74785 100644 (file)
@@ -22,7 +22,7 @@
 #include <stdarg.h>
 
 int
-vsprintf (char *str, char constformat, va_list ap)
+vsprintf (char *str, char const *format, va_list ap)
 {
   return vsnprintf (str, LONG_MAX, format, ap);
 }
index 23aa3053d2c7452d53ddb033deb159aa7e95f2e3..10f874f2616767a12ff236d25f683e5997d5abb1 100644 (file)
@@ -49,7 +49,7 @@ vsscanf (char const *s, char const *template, va_list ap)
             }
           case 'c':
             {
-              char *c = va_arg (ap, char*);
+              char *c = va_arg (ap, char *);
               *c = *p++;
               count++;
               break;
@@ -58,7 +58,7 @@ vsscanf (char const *s, char const *template, va_list ap)
           case 'i':
           case 'u':
             {
-              int *d = va_arg (ap, int*);
+              int *d = va_arg (ap, int *);
               *d = abtol (&p, 10);
               count++;
               break;
index dee539d7d1883e2b805c773ce0471a58433a14e0..5c8bf008983860efcab4f2615b774d70967766a7 100644 (file)
 
 union alloca_header
 {
-  char align[ALIGN_SIZE];      /* To force sizeof(union alloca_header).  */
+  char align[ALIGN_SIZE];       /* To force sizeof(union alloca_header).  */
   struct
-    {
-      union alloca_header *next;               /* For chaining headers.  */
-      char *deep;              /* For stack depth measure.  */
-    } h;
+  {
+    union alloca_header *next;  /* For chaining headers.  */
+    char *deep;                 /* For stack depth measure.  */
+  } h;
 };
 
-static union alloca_header *last_alloca_header = NULL; /* -> last alloca header.  */
+static union alloca_header *last_alloca_header = NULL;  /* -> last alloca header.  */
 
 /* Return a void * to at least SIZE bytes of storage,
    which will be automatically reclaimed upon exit from
@@ -52,43 +52,42 @@ static union alloca_header *last_alloca_header = NULL;      /* -> last alloca header.
 void *
 alloca (size_t size)
 {
-  char probe;          /* Probes stack depth: */
+  char probe;                   /* Probes stack depth: */
   char *depth = ADDRESS_FUNCTION (probe);
 
   /* Reclaim garbage, defined as all alloca'd storage that
      was allocated from deeper in the stack than currently.  */
 
   {
-    union alloca_header *hp;   /* Traverses linked list.  */
+    union alloca_header *hp;    /* Traverses linked list.  */
 
     for (hp = last_alloca_header; hp != NULL;)
-      if ((STACK_DIR > 0 && hp->h.deep > depth)
-         || (STACK_DIR < 0 && hp->h.deep < depth))
-       {
-         union alloca_header *np = hp->h.next;
+      if ((STACK_DIR > 0 && hp->h.deep > depth) || (STACK_DIR < 0 && hp->h.deep < depth))
+        {
+          union alloca_header *np = hp->h.next;
 
-         free ((void *) hp);   /* Collect garbage.  */
+          free ((void *) hp);   /* Collect garbage.  */
 
-         hp = np;              /* -> next header.  */
-       }
+          hp = np;              /* -> next header.  */
+        }
       else
-       break;                  /* Rest are not deeper.  */
+        break;                  /* Rest are not deeper.  */
 
-    last_alloca_header = hp;   /* -> last valid storage.  */
+    last_alloca_header = hp;    /* -> last valid storage.  */
 
   }
 
   if (size == 0)
-    return NULL;               /* No allocation required.  */
+    return NULL;                /* No allocation required.  */
 
   /* Allocate combined header + user data storage.  */
 
   {
-    void * new = malloc (sizeof (union alloca_header) + size);
+    void *new = malloc (sizeof (union alloca_header) + size);
     /* Address of header.  */
 
     if (new == 0)
-      abort();
+      abort ();
 
     ((union alloca_header *) new)->h.next = last_alloca_header;
     ((union alloca_header *) new)->h.deep = depth;
index 9330f3553e352e108331c3123a4254d71e33dd12..40dca93147505a57012b78295748e42a2b403c86 100644 (file)
@@ -24,8 +24,7 @@
 typedef char wchar_t[];
 
 size_t
-mbstowcs (wchar_t *wstring, char const *string,
-          size_t size)
+mbstowcs (wchar_t * wstring, char const *string, size_t size)
 {
   static int stub = 0;
   if (__mes_debug () && !stub)
index d7ada8b7fa792d6927233383384d13a1b3983e92..fea5dff61b88fedc4f209932bb1ffde202e968e2 100644 (file)
@@ -21,7 +21,7 @@
 #include <mes/lib.h>
 
 int
-puts (char consts)
+puts (char const *s)
 {
   oputs (s);
   return oputs ("\n");
index 237f121da2ad58a431bf8c4473c9195f6eb42dfe..4f3e61cb82558342fe19e0961447fde992ccfdb2 100644 (file)
@@ -31,20 +31,20 @@ qswap (void *a, void *b, size_t size)
 }
 
 size_t
-qpart (void *base, size_t count, size_t size, int (*compare)(void const *, void const *))
+qpart (void *base, size_t count, size_t size, int (*compare) (void const *, void const *))
 {
-  void* p = base + count*size;
+  void *p = base + count * size;
   size_t i = 0;
   for (size_t j = 0; j < count; j++)
     {
-      int c = compare (base+j*size, p);
+      int c = compare (base + j * size, p);
       if (c < 0)
         {
-#if 1 //__x86_64__
-          qswap (base+i*size, base+j*size, size);
+#if 1                           //__x86_64__
+          qswap (base + i * size, base + j * size, size);
 #else
-          int p1 = base+i*size;
-          int p2 = base+j*size;
+          int p1 = base + i * size;
+          int p2 = base + j * size;
           qswap (p1, p2, size);
 #endif
           i++;
@@ -52,23 +52,23 @@ qpart (void *base, size_t count, size_t size, int (*compare)(void const *, void
       else if (c == 0)
         i++;
     }
-  if (compare (base+count*size, base+i*size) < 0)
-    qswap (base+i*size, base+count*size, size);
+  if (compare (base + count * size, base + i * size) < 0)
+    qswap (base + i * size, base + count * size, size);
   return i;
 }
 
 void
-qsort (void *base, size_t count, size_t size, int (*compare)(void const *, void const *))
+qsort (void *base, size_t count, size_t size, int (*compare) (void const *, void const *))
 {
   if (count > 1)
     {
-      int p = qpart (base, count-1, size, compare);
+      int p = qpart (base, count - 1, size, compare);
       qsort (base, p, size, compare);
-#if 1 //__x86_64__
-      qsort (base+p*size, count-p, size, compare);
+#if 1                           //__x86_64__
+      qsort (base + p * size, count - p, size, compare);
 #else
-      int p1 = base+p*size;
-      int p2 = count-p;
+      int p1 = base + p * size;
+      int p2 = count - p;
       qsort (p1, p2, size, compare);
 #endif
     }
index 2cd017520f5bf91bc397ed16249ff5110735a5a1..b5e8e6cd487b504bb0498c214a8fdbeccb44b124 100644 (file)
@@ -33,12 +33,12 @@ __argz_count (const char *argz, size_t len)
   size_t count = 0;
   while (len > 0)
     {
-      size_t part_len = strlen(argz);
+      size_t part_len = strlen (argz);
       argz += part_len + 1;
       len -= part_len + 1;
       count++;
     }
   return count;
 }
-libc_hidden_def (__argz_count)
-weak_alias (__argz_count, argz_count)
+
+libc_hidden_def (__argz_count) weak_alias (__argz_count, argz_count)
index 163a2750a1d53fa37cc216cfd7a1a548beb9783d..bbf6292c237ca24275f81a1bc7677b276d76ade1 100644 (file)
@@ -39,4 +39,5 @@ __argz_extract (const char *argz, size_t len, char **argv)
     }
   *argv = 0;
 }
+
 weak_alias (__argz_extract, argz_extract)
index afdfca907a027f223ef83d732139e95c972e3661..307f6433a99beef7d5cb563fc08140da23a4d3be 100644 (file)
@@ -21,8 +21,8 @@
 void *
 memcpy (void *dest, void const *src, size_t n)
 {
-  charp = dest;
-  char constq = src;
+  char *p = dest;
+  char const *q = src;
   while (n--)
     *p++ = *q++;
   return dest;
index a4883e7a3906b517b88c15c75ca2c6fe64e02c51..d65e3b1721dc2accaef1c6cad2694fc313f42be7 100644 (file)
@@ -28,8 +28,7 @@
     Manual v1.15, but it is with /usr/include/string.h   */
 
 unsigned char *
-_memmem (unsigned char const *haystack, int haystack_len,
-         unsigned char const *needle, int needle_len)
+_memmem (unsigned char const *haystack, int haystack_len, unsigned char const *needle, int needle_len)
 {
   unsigned char const *end_haystack = haystack + haystack_len - needle_len + 1;
   unsigned char const *end_needle = needle + needle_len;
@@ -53,10 +52,9 @@ _memmem (unsigned char const *haystack, int haystack_len,
 }
 
 void *
-memmem (void const *haystack, int haystack_len,
-        void const *needle, int needle_len)
+memmem (void const *haystack, int haystack_len, void const *needle, int needle_len)
 {
-  unsigned char const *haystack_byte_c = (unsigned char const *)haystack;
-  unsigned char const *needle_byte_c = (unsigned char const *)needle;
+  unsigned char const *haystack_byte_c = (unsigned char const *) haystack;
+  unsigned char const *needle_byte_c = (unsigned char const *) needle;
   return _memmem (haystack_byte_c, haystack_len, needle_byte_c, needle_len);
 }
index 3149d696ea9dcd137d7dcdea4d43896757fd0067..37b8661d73e8c80ab524888bf54e2fd60998a701 100644 (file)
@@ -26,7 +26,7 @@ memmove (void *dest, void const *src, size_t n)
   if (dest < src)
     return memcpy (dest, src, n);
   char *p = dest + n;
-  char const *q = src +n;
+  char const *q = src + n;
   while (n--)
     *--p = *--q;
   return dest;
index 12e39233bfdb71bfd95d49bb0d51a18f919d1967..40c431119de7c4ccbfc0036d60dc4b150dc53928 100644 (file)
@@ -21,7 +21,7 @@
 #include <string.h>
 
 int
-strcmp (char const* a, char const* b)
+strcmp (char const *a, char const *b)
 {
   while (*a && *b && *a == *b)
     {
index 5a81323e50e337aef6a965bbe119d951bb9a8f71..e87b8ee1a1a3c0c4cb4f612f619933f0baeeb6f3 100644 (file)
@@ -24,7 +24,7 @@ char *
 strdup (char const *s)
 {
   size_t length = strlen (s) + 1;
-  char *p = (char*)malloc (length);
+  char *p = (char *) malloc (length);
   if (p)
     return memcpy (p, s, length);
   return 0;
index d409482ada82e4df11103880edbc8706e6fea1d1..c0c31c65b27269c3d466a6109820d9996a0572c8 100644 (file)
 
 #include <string.h>
 
-char *sys_errlist[] =
-  {
-   "error 00",
-   "error 01",
-   "error 02",
-   "error 03",
-   "error 04",
-   "error 05",
-   "error 06",
-   "error 07",
-   "error 08",
-   "error 09",
-   "error 10",
-   "error 11",
-   "error 12",
-   "error 13",
-   "error 14",
-   "error 15",
-   "error 16",
-   "error 17",
-   "error 18",
-   "error 19",
-   "error 20",
-   "error 21",
-   "error 22",
-   "error 23",
-   "error 24",
-   "error 25",
-   "error 26",
-   "error 27",
-   "error 28",
-   "error 29",
-   "error 30",
-   "error 31",
-   "error 32",
-   "error 33",
-   "error 34",
-   "error 35",
-   "error 36",
-   "error 37",
-   "error 38",
-   "error 39",
-  };
+char *sys_errlist[] = {
+  "error 00",
+  "error 01",
+  "error 02",
+  "error 03",
+  "error 04",
+  "error 05",
+  "error 06",
+  "error 07",
+  "error 08",
+  "error 09",
+  "error 10",
+  "error 11",
+  "error 12",
+  "error 13",
+  "error 14",
+  "error 15",
+  "error 16",
+  "error 17",
+  "error 18",
+  "error 19",
+  "error 20",
+  "error 21",
+  "error 22",
+  "error 23",
+  "error 24",
+  "error 25",
+  "error 26",
+  "error 27",
+  "error 28",
+  "error 29",
+  "error 30",
+  "error 31",
+  "error 32",
+  "error 33",
+  "error 34",
+  "error 35",
+  "error 36",
+  "error 37",
+  "error 38",
+  "error 39",
+};
 
 int sys_nerr = 39;
 
@@ -71,7 +70,9 @@ strerror (int errnum)
 {
   if (__mes_debug ())
     {
-      eputs ("strerror errnum="); eputs (itoa (errnum)); eputs ("\n");
+      eputs ("strerror errnum=");
+      eputs (itoa (errnum));
+      eputs ("\n");
     }
   if (errnum > 0 && errnum <= sys_nerr)
     return sys_errlist[errnum];
index 5d9446b431345db234273abecf3c31205783c7fe..3ce75ef74f7c8ba9833ce3fc94c272f6e68aa4b6 100644 (file)
@@ -21,7 +21,7 @@
 #include <mes/lib.h>
 
 size_t
-strlen (char consts)
+strlen (char const *s)
 {
   int i = 0;
   while (s[i])
index ff3ba121a222431418ccbfd2f48d989c98bc7391..9683f91e0cd550b7d9a6135a22e5df4e6b8e7235 100644 (file)
@@ -25,7 +25,7 @@ strncat (char *to, char const *from, size_t size)
 {
   if (size == 0)
     return to;
-  char *p = strchr (to , '\0');
+  char *p = strchr (to, '\0');
   while (*from && size-- > 0)
     *p++ = *from++;
   *p = 0;
index 81ffd106e12c42794a4d34cdc1036e7cfb74bef6..cfc969578012cf10f5a156c7985db2000cac0636 100644 (file)
@@ -21,7 +21,7 @@
 #include <string.h>
 
 int
-strncmp (char const* a, char const* b, size_t size)
+strncmp (char const *a, char const *b, size_t size)
 {
   if (!size)
     return 0;
index a79a81229c8797ac98d626d6160fc87eee8e90e5..92b0cdb8f704ddbbdac5fc17eb9f155da2b23667 100644 (file)
@@ -21,7 +21,7 @@
 #include <string.h>
 
 char *
-strpbrk (char const *string, char conststopset)
+strpbrk (char const *string, char const *stopset)
 {
   char *p = string;
   while (*p)
index 2e923da4e583e100d181db98066a9304ce145e6d..0b883a25df3c60c5e540e493964f0e9dab7003db 100644 (file)
@@ -22,7 +22,7 @@
 #include <stdio.h>
 
 int
-fpurge (FILE *stream)
+fpurge (FILE * stream)
 {
   static int stub = 0;
   if (__mes_debug () && !stub)
index 0c3f99694e48e3fec7bf728c0f5b60c0b865fdaa..0364f2e1241a73bc54e1d46cbbae82ceff5ff19c 100644 (file)
@@ -22,7 +22,7 @@
 #include <stdio.h>
 
 size_t
-freadahead (FILE *fp)
+freadahead (FILE * fp)
 {
   static int stub = 0;
   if (__mes_debug () && !stub)
index 66751b913baa45675a25602e0b90f7a7ba459c7e..801856ff0c4cff847a98ffd100cbc64455e709c7 100644 (file)
@@ -22,7 +22,7 @@
 #include <stdio.h>
 
 int
-setvbuf (FILE *stream, char *buf, int mode, size_t size)
+setvbuf (FILE * stream, char *buf, int mode, size_t size)
 {
   static int stub = 0;
   if (__mes_debug () && !stub)
index 3259a0548ab5849b6f428924ae66f413a1ec3d17..94e8e7d05eb1ebad8b190cdc19ba8d4a2a6cdcd2 100644 (file)
@@ -22,7 +22,7 @@
 #include <signal.h>
 
 int
-sigaddset (sigset_t *set, int signum)
+sigaddset (sigset_t * set, int signum)
 {
   return 0;
 }
index 78312e0e181fa395d59d5bb2c789cacf05ffce78..a5f3b0765fea41dee2f40c845635d7a1f55cad6d 100644 (file)
@@ -22,7 +22,7 @@
 #include <signal.h>
 
 int
-sigdelset (sigset_t *set, int signum)
+sigdelset (sigset_t * set, int signum)
 {
   return 0;
 }
index de7f2a29c1ae80189179cc6073e2d10c1fd04a7e..a16ca7deee5942d5834716cc9976c34a32c4b0a2 100644 (file)
@@ -22,7 +22,7 @@
 #include <signal.h>
 
 int
-sigemptyset (sigset_t *set)
+sigemptyset (sigset_t * set)
 {
   return 0;
 }
index 02b16cc6d8198b055dcfdd373e60549fcfaf1a78..34ecb5d7fc036acb2b04906606cb981ee59d1856 100644 (file)
@@ -21,8 +21,7 @@
 #include <mes/lib.h>
 
 size_t
-strftime (char *s, size_t size, char const *template,
-          struct tm const *brokentime)
+strftime (char *s, size_t size, char const *template, struct tm const *brokentime)
 {
   static int stub = 0;
   if (__mes_debug () && !stub)
index 12359387a928c5e096ca32c7936ee5a3ad1a046f..018dbd2b7cc9cd261423d9c6bfad44bcdc83a824 100644 (file)
@@ -30,6 +30,6 @@ ttyname (int filedes)
   stub = 1;
   errno = 0;
   if (isatty (filedes))
-      return "/dev/tty0";
+    return "/dev/tty0";
   return 0;
 }
index 7b5c7a98f75d177f74296c59262cc4c3fd39f335..6702ab10c9f6087a98ddce322083ba26b5248ec5 100644 (file)
@@ -32,7 +32,7 @@ main ()
   assert (1);
 
   puts ("t: assert (f==0) ?\n");
-  assert (f==0);
+  assert (f == 0);
 
   return 0;
 }
index 3e89e1d5d752bb84af1dfcca820f20453da3f8ce..602b61764068f8d042292b6454db80eb169631c6 100644 (file)
@@ -26,9 +26,9 @@
 #include <string.h>
 
 int
-qsort_strcmp (void const* a, void const* b)
+qsort_strcmp (void const *a, void const *b)
 {
-  return strcmp (*((char**) a), *((char**) b));
+  return strcmp (*((char **) a), *((char **) b));
 }
 
 int
@@ -55,7 +55,7 @@ main ()
     return 6;
 
   int i = 0;
-  char* list[6] = {0};
+  char *list[6] = { 0 };
   struct dirent *entry = readdir (d);
   if (!entry)
     return 7;
@@ -96,10 +96,11 @@ main ()
     return 12;
 
   oputs ("\nls:\n");
-  qsort (list, 5, sizeof (char*), qsort_strcmp);
+  qsort (list, 5, sizeof (char *), qsort_strcmp);
   for (int i = 0; i < 5; i++)
     {
-      oputs (list[i]); oputs ("\n");
+      oputs (list[i]);
+      oputs ("\n");
     }
 
   if (strcmp (list[0], "."))
index cc16648689edb6c18d1a90617a931acf03ef0d28..a2d49830b0a09648782908445800edcf57fa1333 100644 (file)
 
 struct stat
 {
-  unsigned long  st_dev;
-  unsigned long  st_ino;
+  unsigned long st_dev;
+  unsigned long st_ino;
   unsigned short st_mode;
   unsigned short st_nlink;
   unsigned short st_uid;
   unsigned short st_gid;
-  unsigned long  st_rdev;
-  long           st_size;
-  unsigned int   st_blksize;
-  unsigned int   st_blocks;
-  long           st_atime;
-  unsigned long  st_atime_usec;
-  long           st_mtime;
-  unsigned long  st_mtime_usec;
-  long           st_ctime;
-  unsigned long  st_ctime_usec;
-  unsigned int   __foo0;
-  unsigned int   __foo1;
+  unsigned long st_rdev;
+  long st_size;
+  unsigned int st_blksize;
+  unsigned int st_blocks;
+  long st_atime;
+  unsigned long st_atime_usec;
+  long st_mtime;
+  unsigned long st_mtime_usec;
+  long st_ctime;
+  unsigned long st_ctime_usec;
+  unsigned int __foo0;
+  unsigned int __foo1;
 };
 #endif
 
@@ -74,27 +74,55 @@ main ()
   if (r < 0)
     return 1;
 
-  eputs ("st_dev="); eputs (itoa (sbuf.st_dev)); eputs ("\n");
-  eputs ("st_ino="); eputs (itoa (sbuf.st_ino)); eputs ("\n");
-  eputs ("st_mode="); eputs (itoa (sbuf.st_mode)); eputs ("\n");
-  eputs ("st_nlink="); eputs (itoa (sbuf.st_nlink)); eputs ("\n");
-  eputs ("st_uid="); eputs (itoa (sbuf.st_uid)); eputs ("\n");
-  eputs ("st_gid="); eputs (itoa (sbuf.st_gid)); eputs ("\n");
-  eputs ("st_rdev="); eputs (itoa (sbuf.st_rdev)); eputs ("\n");
-  eputs ("st_size="); eputs (itoa (sbuf.st_size)); eputs ("\n");
+  eputs ("st_dev=");
+  eputs (itoa (sbuf.st_dev));
+  eputs ("\n");
+  eputs ("st_ino=");
+  eputs (itoa (sbuf.st_ino));
+  eputs ("\n");
+  eputs ("st_mode=");
+  eputs (itoa (sbuf.st_mode));
+  eputs ("\n");
+  eputs ("st_nlink=");
+  eputs (itoa (sbuf.st_nlink));
+  eputs ("\n");
+  eputs ("st_uid=");
+  eputs (itoa (sbuf.st_uid));
+  eputs ("\n");
+  eputs ("st_gid=");
+  eputs (itoa (sbuf.st_gid));
+  eputs ("\n");
+  eputs ("st_rdev=");
+  eputs (itoa (sbuf.st_rdev));
+  eputs ("\n");
+  eputs ("st_size=");
+  eputs (itoa (sbuf.st_size));
+  eputs ("\n");
 
-  eputs ("st_blksize="); eputs (itoa (sbuf.st_blksize)); eputs ("\n");
-  eputs ("st_blocks="); eputs (itoa (sbuf.st_blocks)); eputs ("\n");
+  eputs ("st_blksize=");
+  eputs (itoa (sbuf.st_blksize));
+  eputs ("\n");
+  eputs ("st_blocks=");
+  eputs (itoa (sbuf.st_blocks));
+  eputs ("\n");
 
-  eputs ("st_atime="); eputs (itoa (sbuf.st_atime)); eputs ("\n");
+  eputs ("st_atime=");
+  eputs (itoa (sbuf.st_atime));
+  eputs ("\n");
   //eputs ("st_atime_nsec="); eputs (itoa (sbuf.st_atime_nsec)); eputs ("\n");
 
-  eputs ("st_mtime="); eputs (itoa (sbuf.st_mtime)); eputs ("\n");
+  eputs ("st_mtime=");
+  eputs (itoa (sbuf.st_mtime));
+  eputs ("\n");
   //eputs ("st_mtime_nsec="); eputs (itoa (sbuf.st_mtime_nsec)); eputs ("\n");
 
-  eputs ("st_ctime="); eputs (itoa (sbuf.st_ctime)); eputs ("\n");
+  eputs ("st_ctime=");
+  eputs (itoa (sbuf.st_ctime));
+  eputs ("\n");
   //eputs ("st_ctime_nsec="); eputs (itoa (sbuf.st_ctime_nsec)); eputs ("\n");
 
-  eputs ("size:"); eputs (itoa (sizeof (struct stat))); eputs ("\n");
+  eputs ("size:");
+  eputs (itoa (sizeof (struct stat)));
+  eputs ("\n");
   return 0;
 }
index bd4a1be124cdcf3a8bd9822061f9838178e8ed7d..c84714000cdf6237ef4e9444a6432f4e1015d1b4 100644 (file)
@@ -28,7 +28,9 @@ main ()
 
   oputs ("\n");
   oputs ("t: itoa (33) == \"33\"\n");
-  oputs ("=>"); oputs (itoa (33)); oputs ("\n");
+  oputs ("=>");
+  oputs (itoa (33));
+  oputs ("\n");
 
   if (strcmp (itoa (33), "33"))
     return 1;
index 64228846b1da38fda1c9f46eb8d32d24ab9d3c2e..1694ab21f3e1703d8df5bbe153e4d38c77a9adc0 100644 (file)
 int foo;
 
 void
-second()
+second ()
 {
   if (foo++)
     exit (1);
-  oputs ("second\n");        // prints
-  longjmp (buf, 1);          // jumps back to where setjmp was called - making setjmp now return 1
+  oputs ("second\n");           // prints
+  longjmp (buf, 1);             // jumps back to where setjmp was called - making setjmp now return 1
   exit (1);
 }
 
@@ -40,7 +40,7 @@ void
 first ()
 {
   second ();
-  oputs ("first\n");         // does not print
+  oputs ("first\n");            // does not print
   exit (2);
 }
 
@@ -48,10 +48,10 @@ int
 main ()
 {
   if (!setjmp (buf))
-    first ();               // when executed, setjmp returned 0
-  else                      // when longjmp jumps back, setjmp returns 1
+    first ();                   // when executed, setjmp returned 0
+  else                          // when longjmp jumps back, setjmp returns 1
     {
-      oputs ("main\n");    // prints
+      oputs ("main\n");         // prints
       return 0;
     }
 
index fb6e3a7f974a93aa4864ce2e3372d3e60e0ad37f..710b3d0ab25582b3aa26cec882cdab96dbc7c2c4 100644 (file)
@@ -30,21 +30,25 @@ void
 handler (int signum)
 {
 #if __MESC__ && __x86_64__
-  asm ("mov____%rdi,0x8(%rbp) !0x10"); // FIXME: AMDCC
+  asm ("mov____%rdi,0x8(%rbp) !0x10");  // FIXME: AMDCC
 #endif
-  eputs ("handle:"); eputs (itoa (signum)); eputs ("\n");
+  eputs ("handle:");
+  eputs (itoa (signum));
+  eputs ("\n");
   if (signum != SIGALRM)
     exit (66);
   g_alarm_handled_p = 1;
-  #if __x86_64__
+#if __x86_64__
   exit (0);
-  #endif
+#endif
 }
 
 int
 main (void)
 {
-  eputs ("pid_t="); eputs (itoa (sizeof (pid_t))); eputs ("\n");
+  eputs ("pid_t=");
+  eputs (itoa (sizeof (pid_t)));
+  eputs ("\n");
   signal (SIGALRM, handler);
   kill (getpid (), SIGALRM);
   if (!g_alarm_handled_p)
index aba3bae5bc397a8cf0783547e31ba6e02a66616a..b2e694b118d5e082d7a117c747feb8ec0e11bd46 100644 (file)
@@ -54,7 +54,9 @@ main ()
     return 4;
 
   sprintf (buf, "%u", -1);
-  eputs ("buf="); eputs (buf); eputs ("\n");
+  eputs ("buf=");
+  eputs (buf);
+  eputs ("\n");
 
 #if __i386__
   if (strcmp (buf, "4294967295"))
@@ -65,17 +67,20 @@ main ()
 #endif
 
   sprintf (buf, ">>%o<<\n", 12);
-  eputs ("buf="); eputs (buf);
+  eputs ("buf=");
+  eputs (buf);
   if (strcmp (buf, ">>14<<\n"))
     return 7;
 
   sprintf (buf, ">>%x<<\n", 12);
-  eputs ("buf="); eputs (buf);
+  eputs ("buf=");
+  eputs (buf);
   if (strcmp (buf, ">>c<<\n"))
     return 8;
 
   sprintf (buf, ">>%X<<\n", 12);
-  eputs ("buf="); eputs (buf);
+  eputs ("buf=");
+  eputs (buf);
   if (strcmp (buf, ">>C<<\n"))
     return 9;
 
index 43a482b7232a5f412d734e8b30a380f544703210..aa6687cfd45efdfb1e9914dadb1129609505d49f 100644 (file)
@@ -53,22 +53,26 @@ main ()
     return 3;
 
   sprintf (buf, ">%3d<", 11);
-  eputs (buf); eputs ("\n");
+  eputs (buf);
+  eputs ("\n");
   if (strcmp (buf, "> 11<"))
     return 4;
 
   sprintf (buf, ">%03d<", 22);
-  eputs (buf); eputs ("\n");
+  eputs (buf);
+  eputs ("\n");
   if (strcmp (buf, ">022<"))
     return 5;
 
   sprintf (buf, ">%-10d<", 33);
-  eputs (buf); eputs ("\n");
+  eputs (buf);
+  eputs ("\n");
   if (strcmp (buf, ">33        <"))
     return 6;
 
   sprintf (buf, ">%0d<", 44);
-  eputs (buf); eputs ("\n");
+  eputs (buf);
+  eputs ("\n");
   if (strcmp (buf, ">44<"))
     return 7;
 
@@ -80,12 +84,16 @@ main ()
   printf (">>%-*s<<\n", 10, "baz");
 
   sprintf (buf, "%ld", 42);
-  eputs ("buf="); eputs (buf); eputs ("\n");
+  eputs ("buf=");
+  eputs (buf);
+  eputs ("\n");
   if (strcmp (buf, "42"))
     return 8;
 
   sprintf (buf, "%u", -1);
-  eputs ("buf="); eputs (buf); eputs ("\n");
+  eputs ("buf=");
+  eputs (buf);
+  eputs ("\n");
 
 #if __i386__
   if (strcmp (buf, "4294967295"))
@@ -96,52 +104,62 @@ main ()
 #endif
 
   sprintf (buf, ">>%.5s<<\n", "hello, world");
-  eputs ("buf="); eputs (buf);
+  eputs ("buf=");
+  eputs (buf);
   if (strcmp (buf, ">>hello<<\n"))
     return 10;
 
   sprintf (buf, ">>%.*s<<\n", 5, "hello, world");
-  eputs ("buf="); eputs (buf);
+  eputs ("buf=");
+  eputs (buf);
   if (strcmp (buf, ">>hello<<\n"))
     return 11;
 
   sprintf (buf, ">>%.*s<<\n", 20, "hello, world");
-  eputs ("buf="); eputs (buf);
+  eputs ("buf=");
+  eputs (buf);
   if (strcmp (buf, ">>hello, world<<\n"))
     return 12;
 
   sprintf (buf, ">>%.*s<<\n", 10, "foo");
-  eputs ("buf="); eputs (buf);
+  eputs ("buf=");
+  eputs (buf);
   if (strcmp (buf, ">>foo<<\n"))
     return 13;
 
   sprintf (buf, ">>%*s<<\n", 10, "bar");
-  eputs ("buf="); eputs (buf);
+  eputs ("buf=");
+  eputs (buf);
   if (strcmp (buf, ">>       bar<<\n"))
     return 14;
 
   sprintf (buf, ">>%-*s<<\n", 10, "baz");
-  eputs ("buf="); eputs (buf);
+  eputs ("buf=");
+  eputs (buf);
   if (strcmp (buf, ">>baz       <<\n"))
     return 15;
 
   sprintf (buf, ">>%ld<<\n", 12);
-  eputs ("buf="); eputs (buf);
+  eputs ("buf=");
+  eputs (buf);
   if (strcmp (buf, ">>12<<\n"))
     return 16;
 
   sprintf (buf, ">>%o<<\n", 12);
-  eputs ("buf="); eputs (buf);
+  eputs ("buf=");
+  eputs (buf);
   if (strcmp (buf, ">>14<<\n"))
     return 17;
 
   sprintf (buf, ">>%x<<\n", 12);
-  eputs ("buf="); eputs (buf);
+  eputs ("buf=");
+  eputs (buf);
   if (strcmp (buf, ">>c<<\n"))
     return 18;
 
   sprintf (buf, ">>%X<<\n", 12);
-  eputs ("buf="); eputs (buf);
+  eputs ("buf=");
+  eputs (buf);
   if (strcmp (buf, ">>C<<\n"))
     return 19;
 
@@ -153,7 +171,9 @@ main ()
 #endif
 
   sprintf (buf, "foo%nbar\n", &n);
-  eputs ("buf="); eputs (buf); eputs ("\n");
+  eputs ("buf=");
+  eputs (buf);
+  eputs ("\n");
   if (strcmp (buf, "foobar\n"))
     return 21;
   if (n != 3)
@@ -164,7 +184,9 @@ main ()
 #endif
 
   sprintf (buf, "%12.8d\n", 12345);
-  eputs ("buf="); eputs (buf); eputs ("\n");
+  eputs ("buf=");
+  eputs (buf);
+  eputs ("\n");
   if (strcmp (buf, "    00012345\n"))
     return 23;
 
index 7226578f59f26bf2892460ad99a88fada49607e5..93182941ba28f59e64e49893f780f5c3053dc74a 100644 (file)
 #include <string.h>
 #include <stdlib.h>
 
-int main()
+int
+main ()
 {
-       FILE* test = fopen("tmp", "a+");
-       FILE* hold = fopen("tmp", "r");
-       int a;
-       int b;
-       int i = 1000;
-       do
-       {
-               a = fgetc(test);
-               b = fgetc(hold);
-               fprintf(stdout, "%c == %c\n", a, b);
-               if(i < 1000)
-               {
-                       fflush(test);
-                       fputc('a', test);
-               }
-               if(b == EOF) exit(EXIT_SUCCESS);
-               i = i + 1;
-       }while (a == b);
-       fprintf(stderr, "OOOPS you were not supposed to get here\n");
-       exit(EXIT_FAILURE);
+  FILE *test = fopen ("tmp", "a+");
+  FILE *hold = fopen ("tmp", "r");
+  int a;
+  int b;
+  int i = 1000;
+  do
+    {
+      a = fgetc (test);
+      b = fgetc (hold);
+      fprintf (stdout, "%c == %c\n", a, b);
+      if (i < 1000)
+        {
+          fflush (test);
+          fputc ('a', test);
+        }
+      if (b == EOF)
+        exit (EXIT_SUCCESS);
+      i = i + 1;
+    }
+  while (a == b);
+  fprintf (stderr, "OOOPS you were not supposed to get here\n");
+  exit (EXIT_FAILURE);
 }
index b304c9b4f0939de4df9f857ed06da6756f9a68a7..59d8db1b6e9b3933828583b447a48e94fd3fc935 100644 (file)
@@ -27,7 +27,7 @@
 #include <stdlib.h>
 
 int
-dump (char const *name, char constcontents)
+dump (char const *name, char const *contents)
 {
   unlink (name);
   FILE *f = fopen (name, "w");
@@ -40,7 +40,7 @@ main ()
 {
   char *line = "The first line.\n";
   char *contents = "The first line.\nThe second line.\nThe last line.\n";
-  charend = "That's all folks!\n";
+  char *end = "That's all folks!\n";
 
   char *tmp = "foo";
 
@@ -53,7 +53,9 @@ main ()
   char buf[80];
   memset (buf, 0, sizeof (buf));
   fread (buf, strlen (line), 1, t);
-  eputs ("buf="); eputs (buf); eputs ("\n");
+  eputs ("buf=");
+  eputs (buf);
+  eputs ("\n");
   if (strcmp (buf, line))
     return 2;
 
@@ -62,7 +64,9 @@ main ()
   fseek (t, 0, SEEK_SET);
   memset (buf, 0, sizeof (buf));
   fread (buf, strlen (line), 1, t);
-  eputs ("buf="); eputs (buf); eputs ("\n");
+  eputs ("buf=");
+  eputs (buf);
+  eputs ("\n");
   if (strcmp (buf, line))
     return 3;
 
@@ -76,7 +80,9 @@ main ()
   fseek (t, 0, SEEK_SET);
   memset (buf, 0, sizeof (buf));
   fread (buf, strlen (end), 1, t);
-  eputs ("buf="); eputs (buf); eputs ("\n");
+  eputs ("buf=");
+  eputs (buf);
+  eputs ("\n");
   if (strcmp (buf, end))
     return 5;
 
@@ -98,7 +104,9 @@ main ()
   fseek (t, 0, SEEK_SET);
   memset (buf, 0, sizeof (buf));
   fread (buf, strlen (line), 1, t);
-  eputs ("buf="); eputs (buf); eputs ("\n");
+  eputs ("buf=");
+  eputs (buf);
+  eputs ("\n");
   if (strcmp (buf, line))
     return 8;
 
@@ -106,7 +114,9 @@ main ()
 
   fseek (t, 0, SEEK_SET);
   fread (buf, strlen (line), 1, t);
-  eputs ("buf="); eputs (buf); eputs ("\n");
+  eputs ("buf=");
+  eputs (buf);
+  eputs ("\n");
   if (strcmp (buf, line))
     return 9;
 
index dfd507e2a9a00bb4c8376bd5b169b7ffdd2f1a2e..cc079ead4714dd0d02036d90496ce73df252072b 100644 (file)
@@ -47,7 +47,7 @@ main ()
   int size = ftell (t);
   fprintf (stderr, "  size=>%d\n", size);
   fseek (t, 0, SEEK_SET);
-  char *p = (char*)malloc (size + 1);
+  char *p = (char *) malloc (size + 1);
   fread (p, size, 1, t);
   fwrite (p, size, 1, n);
 
@@ -59,7 +59,9 @@ main ()
   char buf[200];
   fflush (n);
   fread (buf, strlen (header_plus_data), 1, test);
-  eputs ("buf="); eputs (buf); eputs ("\n");
+  eputs ("buf=");
+  eputs (buf);
+  eputs ("\n");
   if (strcmp (buf, header_plus_data))
     return 1;
 
index 6e4318d0f4dd4f0e4d31999c9f7fd57fd94a208e..b776c1dd6b988938a219ae918ae9135e09038b76 100644 (file)
@@ -30,7 +30,7 @@ main ()
   int fd = open ("COPYING", 0);
   if (fd <= 0)
     return 1;
-  FILEf = fdopen (fd, "r");
+  FILE *f = fdopen (fd, "r");
   int r = fseek (f, 0, SEEK_CUR);
   if (r != 0)
     return 2;
@@ -43,14 +43,17 @@ main ()
     return 4;
 
   pos = ftell (f);
-  eputs ("size="); eputs (itoa (pos)); eputs ("\n");
+  eputs ("size=");
+  eputs (itoa (pos));
+  eputs ("\n");
   if (pos != 35147)
     return 5;
   r = fseek (f, 0, SEEK_SET);
 
   char buf[4096];
   fgets (buf, 200, f);
-  eputs ("buf:"); eputs (buf);
+  eputs ("buf:");
+  eputs (buf);
   if (strcmp (buf, "                    GNU GENERAL PUBLIC LICENSE\n"))
     return 6;
 
index c3af98f4f1b8451dc8b9fe6ab722b5c40d5a0905..f0caf75567b50ea0b621857d1322ee4b36824c49 100644 (file)
@@ -39,14 +39,14 @@ main (int argc, char *argv[])
   oputs (itoa (p));
   oputs ("\n");
   int i;
-  for (i = 0; i < size; i=i+1)
+  for (i = 0; i < size; i = i + 1)
     {
       oputs ("set ");
       oputs (itoa (i));
       oputs ("\n");
       p[i] = i;
     }
-  for (i = 0; i < size; i=i+1)
+  for (i = 0; i < size; i = i + 1)
     {
       oputs (itoa (i));
       oputs (": ");
index bc88e8ae0430b7d1ecc9df68908ad03144288ba1..644a472e46ee2e60a01d9815b0dd0bfd04a899da 100644 (file)
@@ -29,15 +29,19 @@ main ()
 {
   char *p = "42foo\n";
   int n = abtol (&p, 0);
-  if (n != 42) return 1;
+  if (n != 42)
+    return 1;
   eputs (p);
-  if (strcmp (p, "foo\n")) return 2;
+  if (strcmp (p, "foo\n"))
+    return 2;
 
   p = "2azar\n";
-  n = strtoull (p, (char**)&p, 16);
-  if (n != 42) return 3;
+  n = strtoull (p, (char **) &p, 16);
+  if (n != 42)
+    return 3;
   eputs (p);
-  if (strcmp (p, "zar\n")) return 4;
+  if (strcmp (p, "zar\n"))
+    return 4;
 
   return 0;
 }
index 96934547903ac5be23cff2601628aa443cf8dd40..9912e7f4af148610f5cbe8d5fcea9fcd3e6422f2 100644 (file)
 #include <string.h>
 
 int
-qsort_strcmp (void const* a, void const* b)
+qsort_strcmp (void const *a, void const *b)
 {
-  return strcmp (*((char**) a), *((char**) b));
+  return strcmp (*((char **) a), *((char **) b));
 }
 
 int
 main ()
 {
-  char* list[3] = {"foo", "foo", 0 };
+  char *list[3] = { "foo", "foo", 0 };
   oputs ("\nls:\n");
-  qsort (list, 2, sizeof (char*), qsort_strcmp);
+  qsort (list, 2, sizeof (char *), qsort_strcmp);
   for (int i = 0; i < 2; i++)
     {
-      oputs (list[i]); oputs ("\n");
+      oputs (list[i]);
+      oputs ("\n");
     }
 
   return 0;
index 1cc0f4e81f628f86f258970843f492dd4b0860b3..c8be4cd2fa82e604a70270e5f5bf66c3511691a2 100644 (file)
 int
 compare_int (void *a, void *b)
 {
-  eputs ("compare: "); eputs (itoa (*(int*)a)); eputs (" <? "); eputs (itoa (*(int*)b));
-  eputs (" => "); eputs (itoa (*(int*)a - *(int*)b)); eputs ("\n");
-  return *(int*)a - *(int*)b;
+  eputs ("compare: ");
+  eputs (itoa (*(int *) a));
+  eputs (" <? ");
+  eputs (itoa (*(int *) b));
+  eputs (" => ");
+  eputs (itoa (*(int *) a - *(int *) b));
+  eputs ("\n");
+  return *(int *) a - *(int *) b;
 }
 
 int
 main ()
 {
-  int lst[6] = {0, 5, 4, 3, 2, -1};
+  int lst[6] = { 0, 5, 4, 3, 2, -1 };
   qsort (lst, 6, sizeof (int), compare_int);
   for (int i = 0; i < 6; i++)
     {
-      eputs (itoa (i)); eputs (":"); eputs (itoa (lst[i])); eputs ("\n");
+      eputs (itoa (i));
+      eputs (":");
+      eputs (itoa (lst[i]));
+      eputs ("\n");
     }
-  if (lst[0] != -1) return 1;
-  if (lst[5] != 5) return 2;
+  if (lst[0] != -1)
+    return 1;
+  if (lst[5] != 5)
+    return 2;
   return 0;
 }
index c1fefc6828f12a6b8f58014074a16e0374dca024..318ce05246ed9d2e98b3ff57f6b912899594ef42 100644 (file)
@@ -41,14 +41,18 @@ main ()
     4;
 
   char *p = "16";
-  int n = strtol (p, (char **)&p, 0);
-  eputs ("p="); eputs (p); eputs ("\n");
+  int n = strtol (p, (char **) &p, 0);
+  eputs ("p=");
+  eputs (p);
+  eputs ("\n");
   if (*p != 0)
     return 5;
 
   p = "0x12";
-  n = strtol (p, (char **)&p, 0);
-  eputs ("p="); eputs (p); eputs ("\n");
+  n = strtol (p, (char **) &p, 0);
+  eputs ("p=");
+  eputs (p);
+  eputs ("\n");
   if (*p != 0)
     return 5;
 
index 09f798afb5ea522af66ca5ef27eddca6d817ed87..94b4c13a32b695ce8c78c9e0aa13e6394ea792ab 100644 (file)
@@ -26,7 +26,7 @@ main ()
   if (strlen ("mes") == 3)
     goto ok;
   return 1;
- ok:
+ok:
   if (strlen ("mes") != 3)
     return 1;
   return 0;
index 2240a006d4dce2a3707dc2e6b9823035fe41adc5..bef3939c20e66433c9e8d4384b1272fded223470 100644 (file)
@@ -37,14 +37,16 @@ main ()
     return 2;
 
   oputs ("t: if (!strcmp (p, \"t.c\\n\"))\n");
-  if (!strcmp (p, "mes")) goto ok1;
+  if (!strcmp (p, "mes"))
+    goto ok1;
   return 3;
- ok1:
+ok1:
 
   oputs ("t: if (strcmp (p, \"foo\"))\n");
-  if (strcmp (p, "foo")) goto ok2;
+  if (strcmp (p, "foo"))
+    goto ok2;
   return 4;
- ok2:
+ok2:
 
   oputs ("t: itoa (33) == \"33\"\n");
   if (strcmp (itoa (33), "33"))
index 28ad9fa4561f0e623a369959d0cd3b6e3b766227..0e79e6c15a70106f27e5f8b66dd60cb79fd85fa3 100644 (file)
@@ -26,7 +26,7 @@ int
 main ()
 {
   puts ("\n");
-  char buf[10] = {0,0,0,0,0,0,0,0,0,0};
+  char buf[10] = { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 };
   strncpy (buf, "mesxxx", 3);
   puts ("buf:");
   puts (buf);
index 54410d147fd515d54067cfa99da4e9022fa51324..06b1f89d155f9169663c27b2a23be7c7a79e81d2 100644 (file)
@@ -28,8 +28,10 @@ int
 main ()
 {
   int n = snprintf (0, 0, "%s", "0123456");
-  eputs ("***n="); eputs (itoa (n)); eputs ("\n");
-  exit(n != 7);
+  eputs ("***n=");
+  eputs (itoa (n));
+  eputs ("\n");
+  exit (n != 7);
 
   /* if (n) */
   /*   return 1; */
index 68189fcc11451ca48b62c9c0b4b9a28b0d03f5a3..5e1508fcc3660a07316b8724f3dee6d6521ded2a 100644 (file)
@@ -27,12 +27,14 @@ main ()
   strcpy (buf, "foo");
 
   strcat (buf, " bar");
-  eputs (buf); eputs ("\n");
+  eputs (buf);
+  eputs ("\n");
   if (strcmp (buf, "foo bar"))
-   return 1;
+    return 1;
 
   strncat (buf, " bazzzz", 4);
-  eputs (buf); eputs ("\n");
+  eputs (buf);
+  eputs ("\n");
   if (strcmp (buf, "foo bar baz"))
     return 2;
 
index 63ba18578cf7b3bfc726fbfba9dc2563e5cc0ae7..df65cf982b8843dd4664c8f5018bb7732dbba991 100644 (file)
@@ -41,9 +41,9 @@ longjmp (jmp_buf env, int val)
 int
 setjmp (jmp_buf env)
 {
-  long *p = (long*)&env;
+  long *p = (long *) &env;
   env[0].__bp = p[-2];
   env[0].__pc = p[-1];
-  env[0].__sp = (long)&env;
+  env[0].__sp = (long) &env;
   return 0;
 }
index db3dc4a322cc971943c0e704d3143bdaf1429e8a..8decb6e31c4bbbd047a4f0e35d4bf31acea6269b 100644 (file)
@@ -25,22 +25,22 @@ longjmp (jmp_buf env, int val)
 {
   val = val == 0 ? 1 : val;
   ///asm ("mov____0x8(%ebp),%eax !0x0c"); // val
-  asm ("mov____0x8(%ebp),%ebp !0x08"); // env*
+  asm ("mov____0x8(%ebp),%ebp !0x08");  // env*
 
-  asm ("mov____0x8(%ebp),%ebx !0x4");  // env.__pc
-  asm ("mov____0x8(%ebp),%esp !0x8");  // env.__sp
-  asm ("mov____0x8(%ebp),%ebp !0x0");  // env.__bp
+  asm ("mov____0x8(%ebp),%ebx !0x4");   // env.__pc
+  asm ("mov____0x8(%ebp),%esp !0x8");   // env.__sp
+  asm ("mov____0x8(%ebp),%ebp !0x0");   // env.__bp
   asm ("jmp____*%ebx");
   // not reached
   exit (42);
 }
 
 int
-setjmp (__jmp_buf *env)
+setjmp (__jmp_buf * env)
 {
-  long *p = (long*)&env;
+  long *p = (long *) &env;
   env[0].__bp = p[-2];
   env[0].__pc = p[-1];
-  env[0].__sp = (long)&env;
+  env[0].__sp = (long) &env;
   return 0;
 }
index 85a9ef0e4700ebb4e7dbb365494ba9f30bfabefc..ebf5c1ced423e54a0a64eb6bbbd1ebdc9fa03c01 100644 (file)
 void
 longjmp (jmp_buf env, int val)
 {
-#if 0 //MES_CCAMD64
+#if 0                           //MES_CCAMD64
   asm ("push___%rdi");
 #endif
   val = val == 0 ? 1 : val;
-#if 0 //MES_CCAMD64
+#if 0                           //MES_CCAMD64
   asm ("pop____%rdi");
   asm ("mov____0x8(%rdi),%rbp !0x00");  // env->__bp
   asm ("mov____0x8(%rdi),%rbx !0x08");  // env->__pc
   asm ("mov____0x8(%rdi),%rsp !0x10");  // env->__sp
-  asm ("jmp____*%rbx");                 // jmp *PC
+  asm ("jmp____*%rbx");         // jmp *PC
 #else
-  asm ("mov____0x8(%rbp),%rbp !0x10"); // env*
+  asm ("mov____0x8(%rbp),%rbp !0x10");  // env*
 
   asm ("mov____0x8(%rbp),%rbx !0x08");  // env.__pc
   asm ("mov____0x8(%rbp),%rsp !0x10");  // env.__sp
@@ -46,9 +46,9 @@ longjmp (jmp_buf env, int val)
 }
 
 int
-setjmp (__jmp_buf *env)
+setjmp (__jmp_buf * env)
 {
-#if 0 //MES_CCAMD64
+#if 0                           //MES_CCAMD64
   asm ("mov____%rbp,%rax");
   asm ("add____$i32,%rax %0x80");
 
@@ -62,10 +62,10 @@ setjmp (__jmp_buf *env)
   asm ("add____$i32,%rsi %0x10");
   asm ("mov____%rsi,0x8(%rdi) !0x10");
 #else
-  long *p = (long*)&env;
+  long *p = (long *) &env;
   env[0].__bp = p[-2];
   env[0].__pc = p[-1];
-  env[0].__sp = (long)&env;
+  env[0].__sp = (long) &env;
 #endif
   return 0;
 }
index 43437a522a5b49c5d30192894815214985efb1bd..905772f7c5a54032269fc31bd81b750e5494256a 100644 (file)
@@ -22,7 +22,7 @@
 #include <string.h>
 
 int
-strcmp (char const* a, char const* b)
+strcmp (char const *a, char const *b)
 {
   while (*a && *b && *a == *b)
     {
index 59532cdb5eddd922cc22c7b058c3d38435fb9826..4e8b3c8a3225d9d7f77fea50e4810c43ffdb8b24 100644 (file)
@@ -38,20 +38,24 @@ int g_free = 0;
 SCM g_continuations = 0;
 SCM g_symbols = 0;
 SCM g_stack = 0;
-SCM r0 = 0; // a/env
-SCM r1 = 0; // param 1
-SCM r2 = 0; // save 2+load/dump
-SCM r3 = 0; // continuation
+SCM r0 = 0;                     // a/env
+SCM r1 = 0;                     // param 1
+SCM r2 = 0;                     // save 2+load/dump
+SCM r3 = 0;                     // continuation
 
-enum type_t {TCHAR, TCLOSURE, TCONTINUATION, TFUNCTION, TKEYWORD, TMACRO, TNUMBER, TPAIR, TREF, TSPECIAL, TSTRING, TSYMBOL, TVALUES, TVECTOR, TBROKEN_HEART};
+enum type_t
+{ TCHAR, TCLOSURE, TCONTINUATION, TFUNCTION, TKEYWORD, TMACRO, TNUMBER, TPAIR, TREF, TSPECIAL, TSTRING,
+    TSYMBOL, TVALUES, TVECTOR, TBROKEN_HEART };
 
-struct scm {
+struct scm
+{
   enum type_t type;
   SCM car;
   SCM cdr;
 };
 
-struct function {
+struct function
+{
   int (*function) (void);
   int arity;
   char *name;
@@ -60,7 +64,7 @@ struct function {
 #if __MESC__
 struct scm *g_cells = arena;
 #else
-struct scm *g_cells = (struct scm*)arena;
+struct scm *g_cells = (struct scm *) arena;
 #endif
 
 #define cell_nil 1
@@ -101,26 +105,30 @@ int g_function = 0;
 
 
 SCM make_cell_ (SCM type, SCM car, SCM cdr);
-struct function fun_make_cell_ = {&make_cell_,3,"core:make-cell"};
-struct scm scm_make_cell_ = {TFUNCTION,0,0};
+struct function fun_make_cell_ = { &make_cell_, 3, "core:make-cell" };
+struct scm scm_make_cell_ = { TFUNCTION, 0, 0 };
+
    //, "core:make-cell", 0};
 SCM cell_make_cell_;
 
 SCM cons (SCM x, SCM y);
-struct function fun_cons = {&cons,2,"cons"};
-struct scm scm_cons = {TFUNCTION,0,0};
+struct function fun_cons = { &cons, 2, "cons" };
+struct scm scm_cons = { TFUNCTION, 0, 0 };
+
   // "cons", 0};
 SCM cell_cons;
 
 SCM car (SCM x);
-struct function fun_car = {&car,1,"car"};
-struct scm scm_car = {TFUNCTION,0,0};
+struct function fun_car = { &car, 1, "car" };
+struct scm scm_car = { TFUNCTION, 0, 0 };
+
   // "car", 0};
 SCM cell_car;
 
 SCM cdr (SCM x);
-struct function fun_cdr = {&cdr,1,"cdr"};
-struct scm scm_cdr = {TFUNCTION,0,0};
+struct function fun_cdr = { &cdr, 1, "cdr" };
+struct scm scm_cdr = { TFUNCTION, 0, 0 };
+
 // "cdr", 0};
 SCM cell_cdr;
 
@@ -167,18 +175,25 @@ make_cell_ (SCM type, SCM car, SCM cdr)
   SCM x = alloc (1);
   assert (TYPE (type) == TNUMBER);
   TYPE (x) = VALUE (type);
-  if (VALUE (type) == TCHAR || VALUE (type) == TNUMBER) {
-    if (car) CAR (x) = CAR (car);
-    if (cdr) CDR(x) = CDR(cdr);
-  }
-  else if (VALUE (type) == TFUNCTION) {
-    if (car) CAR (x) = car;
-    if (cdr) CDR(x) = CDR(cdr);
-  }
-  else {
-    CAR (x) = car;
-    CDR(x) = cdr;
-  }
+  if (VALUE (type) == TCHAR || VALUE (type) == TNUMBER)
+    {
+      if (car)
+        CAR (x) = CAR (car);
+      if (cdr)
+        CDR (x) = CDR (cdr);
+    }
+  else if (VALUE (type) == TFUNCTION)
+    {
+      if (car)
+        CAR (x) = car;
+      if (cdr)
+        CDR (x) = CDR (cdr);
+    }
+  else
+    {
+      CAR (x) = car;
+      CDR (x) = cdr;
+    }
   return x;
 }
 
@@ -212,7 +227,7 @@ car (SCM x)
 SCM
 cdr (SCM x)
 {
-  return CDR(x);
+  return CDR (x);
 }
 
 SCM
@@ -226,7 +241,8 @@ gc_push_frame ()
 SCM
 append2 (SCM x, SCM y)
 {
-  if (x == cell_nil) return y;
+  if (x == cell_nil)
+    return y;
   assert (TYPE (x) == TPAIR);
   return cons (car (x), append2 (cdr (x), y));
 }
@@ -238,19 +254,19 @@ pairlis (SCM x, SCM y, SCM a)
     return a;
   if (TYPE (x) != TPAIR)
     return cons (cons (x, y), a);
-  return cons (cons (car (x), car (y)),
-               pairlis (cdr (x), cdr (y), a));
+  return cons (cons (car (x), car (y)), pairlis (cdr (x), cdr (y), a));
 }
 
 SCM
 assq (SCM x, SCM a)
 {
-  while (a != cell_nil && x == CAAR (a)) a = CDR (a);
+  while (a != cell_nil && x == CAAR (a))
+    a = CDR (a);
   return a != cell_nil ? car (a) : cell_f;
 }
 
 SCM
-push_cc (SCM p1, SCM p2, SCM a, SCM c) ///((internal))
+push_cc (SCM p1, SCM p2, SCM a, SCM c)  ///((internal))
 {
   puts ("push cc\n");
   SCM x = r3;
@@ -263,40 +279,66 @@ push_cc (SCM p1, SCM p2, SCM a, SCM c) ///((internal))
   return cell_unspecified;
 }
 
-SCM caar (SCM x) {return car (car (x));}
-SCM cadr (SCM x) {return car (cdr (x));}
-SCM cdar (SCM x) {return cdr (car (x));}
-SCM cddr (SCM x) {return cdr (cdr (x));}
+SCM
+caar (SCM x)
+{
+  return car (car (x));
+}
+
+SCM
+cadr (SCM x)
+{
+  return car (cdr (x));
+}
+
+SCM
+cdar (SCM x)
+{
+  return cdr (car (x));
+}
+
+SCM
+cddr (SCM x)
+{
+  return cdr (cdr (x));
+}
 
 #if __GNUC__
 //FIXME
-SCM call (SCM,SCM);
+SCM call (SCM, SCM);
 SCM gc_pop_frame ();
 #endif
 
 SCM
 eval_apply ()
 {
- eval_apply:
+eval_apply:
   switch (r3)
     {
-    case cell_vm_apply: {goto apply;}
-    case cell_unspecified: {return r1;}
+    case cell_vm_apply:
+      {
+        goto apply;
+      }
+    case cell_unspecified:
+      {
+        return r1;
+      }
     }
 
   SCM x = cell_nil;
   SCM y = cell_nil;
 
- apply:
+apply:
   switch (TYPE (car (r1)))
     {
-    case TFUNCTION: {
-      puts ("apply.function\n");
-      r1 = call (car (r1), cdr (r1));
-      goto vm_return;
-    }
+    case TFUNCTION:
+      {
+        puts ("apply.function\n");
+        r1 = call (car (r1), cdr (r1));
+        goto vm_return;
+      }
     }
- vm_return:
+vm_return:
   x = r1;
   gc_pop_frame ();
   r1 = x;
@@ -307,19 +349,33 @@ SCM
 call (SCM fn, SCM x)
 {
   puts ("call\n");
-  if ((FUNCTION (fn).arity > 0 || FUNCTION (fn).arity == -1)
-      && x != cell_nil && TYPE (CAR (x)) == TVALUES)
+  if ((FUNCTION (fn).arity > 0 || FUNCTION (fn).arity == -1) && x != cell_nil && TYPE (CAR (x)) == TVALUES)
     x = cons (CADAR (x), CDR (x));
   if ((FUNCTION (fn).arity > 1 || FUNCTION (fn).arity == -1)
       && x != cell_nil && TYPE (CDR (x)) == TPAIR && TYPE (CADR (x)) == TVALUES)
     x = cons (CAR (x), cons (CDADAR (x), CDR (x)));
   switch (FUNCTION (fn).arity)
     {
-    case 0: {return (FUNCTION (fn).function) ();}
-    case 1: {return ((SCM(*)(SCM))(FUNCTION (fn).function)) (car (x));}
-    case 2: {return ((SCM(*)(SCM,SCM))(FUNCTION (fn).function)) (car (x), cadr (x));}
-    case 3: {return ((SCM(*)(SCM,SCM,SCM))(FUNCTION (fn).function)) (car (x), cadr (x), car (cddr (x)));}
-    case -1: {return ((SCM(*)(SCM))(FUNCTION (fn).function)) (x);}
+    case 0:
+      {
+        return (FUNCTION (fn).function) ();
+      }
+    case 1:
+      {
+        return ((SCM (*)(SCM)) (FUNCTION (fn).function)) (car (x));
+      }
+    case 2:
+      {
+        return ((SCM (*)(SCM, SCM)) (FUNCTION (fn).function)) (car (x), cadr (x));
+      }
+    case 3:
+      {
+        return ((SCM (*)(SCM, SCM, SCM)) (FUNCTION (fn).function)) (car (x), cadr (x), car (cddr (x)));
+      }
+    case -1:
+      {
+        return ((SCM (*)(SCM)) (FUNCTION (fn).function)) (x);
+      }
     }
   return cell_unspecified;
 }
@@ -344,7 +400,7 @@ gc_pop_frame ()
 }
 
 SCM
-mes_g_stack (SCM a) ///((internal))
+mes_g_stack (SCM a)             ///((internal))
 {
   r0 = a;
   r1 = MAKE_CHAR (0);
@@ -356,7 +412,7 @@ mes_g_stack (SCM a) ///((internal))
 
 //\f Environment setup
 SCM
-make_tmps (struct scm* cells)
+make_tmps (struct scm * cells)
 {
   tmp = g_free++;
   cells[tmp].type = TCHAR;
@@ -401,7 +457,7 @@ gc_init_cells ()
 // INIT NEWS
 
 SCM
-mes_symbols () ///((internal))
+mes_symbols ()                  ///((internal))
 {
   gc_init_cells ();
   //  gc_init_news ();
@@ -409,61 +465,61 @@ mes_symbols () ///((internal))
 #if __GNUC__ && 0
   //#include "mes.symbols.i"
 #else
-g_free++;
+  g_free++;
 // g_cells[cell_nil] = scm_nil;
 
-g_free++;
+  g_free++;
 // g_cells[cell_f] = scm_f;
 
-g_free++;
+  g_free++;
 // g_cells[cell_t] = scm_t;
 
-g_free++;
+  g_free++;
 // g_cells[cell_dot] = scm_dot;
 
-g_free++;
+  g_free++;
 // g_cells[cell_arrow] = scm_arrow;
 
-g_free++;
+  g_free++;
 // g_cells[cell_undefined] = scm_undefined;
 
-g_free++;
+  g_free++;
 // g_cells[cell_unspecified] = scm_unspecified;
 
-g_free++;
+  g_free++;
 // g_cells[cell_closure] = scm_closure;
 
-g_free++;
+  g_free++;
 // g_cells[cell_circular] = scm_circular;
 
-g_free++;
+  g_free++;
 // g_cells[cell_begin] = scm_begin;
 
 ///
-g_free = 44;
-g_free++;
+  g_free = 44;
+  g_free++;
 // g_cells[cell_vm_apply] = scm_vm_apply;
 
-g_free++;
+  g_free++;
 // g_cells[cell_vm_apply2] = scm_vm_apply2;
 
-g_free++;
+  g_free++;
 // g_cells[cell_vm_eval] = scm_vm_eval;
 
 ///
-g_free = 55;
-g_free++;
+  g_free = 55;
+  g_free++;
 // g_cells[cell_vm_begin] = scm_vm_begin;
 
-g_free++;
+  g_free++;
 // g_cells[cell_vm_begin_read_input_file] = scm_vm_begin_read_input_file;
 
-g_free++;
+  g_free++;
 // g_cells[cell_vm_begin2] = scm_vm_begin2;
 
 ///
-g_free = 62;
-g_free++;
+  g_free = 62;
+  g_free++;
 // g_cells[cell_vm_return] = scm_vm_return;
 
 #endif
@@ -472,7 +528,7 @@ g_free++;
   make_tmps (g_cells);
 
   g_symbols = 0;
-  for (int i=1; i<g_symbol_max; i++)
+  for (int i = 1; i < g_symbol_max; i++)
     g_symbols = cons (i, g_symbols);
 
   SCM a = cell_nil;
@@ -491,7 +547,7 @@ make_closure (SCM args, SCM body, SCM a)
 }
 
 SCM
-mes_environment () ///((internal))
+mes_environment ()              ///((internal))
 {
   SCM a = 0;
   a = mes_symbols ();
@@ -517,34 +573,34 @@ mes_builtins (SCM a)
 // #include "posix.environment.i"
 // #include "reader.environment.i"
 #else
-scm_make_cell_.cdr = g_function;
-g_functions[g_function++] = fun_make_cell_;
-cell_make_cell_ = g_free++;
- g_cells[cell_make_cell_] = scm_make_cell_;
-scm_cons.cdr = g_function;
-g_functions[g_function++] = fun_cons;
-cell_cons = g_free++;
-g_cells[cell_cons] = scm_cons;
-scm_car.cdr = g_function;
-g_functions[g_function++] = fun_car;
-cell_car = g_free++;
-g_cells[cell_car] = scm_car;
-scm_cdr.cdr = g_function;
-g_functions[g_function++] = fun_cdr;
-cell_cdr = g_free++;
-g_cells[cell_cdr] = scm_cdr;
+  scm_make_cell_.cdr = g_function;
+  g_functions[g_function++] = fun_make_cell_;
+  cell_make_cell_ = g_free++;
 g_cells[cell_make_cell_] = scm_make_cell_;
+
+  scm_cons.cdr = g_function;
+  g_functions[g_function++] = fun_cons;
+  cell_cons = g_free++;
+  g_cells[cell_cons] = scm_cons;
+
+  scm_car.cdr = g_function;
+  g_functions[g_function++] = fun_car;
+  cell_car = g_free++;
+  g_cells[cell_car] = scm_car;
+
+  scm_cdr.cdr = g_function;
+  g_functions[g_function++] = fun_cdr;
+  cell_cdr = g_free++;
+  g_cells[cell_cdr] = scm_cdr;
 #endif
   return a;
 }
 
 SCM
-bload_env (SCM a) ///((internal))
+bload_env (SCM a)               ///((internal))
 {
   __stdin = open ("module/mes/read-0.mo", 0);
-  char *p = (char*)g_cells;
+  char *p = (char *) g_cells;
   assert (getchar () == 'M');
   assert (getchar () == 'E');
   assert (getchar () == 'S');
@@ -556,7 +612,7 @@ bload_env (SCM a) ///((internal))
       *p++ = c;
       c = getchar ();
     }
-  g_free = (p-(char*)g_cells) / sizeof (struct scm);
+  g_free = (p - (char *) g_cells) / sizeof (struct scm);
   gc_peek_frame ();
   g_symbols = r1;
   __stdin = STDIN;
@@ -655,7 +711,8 @@ display_ (SCM x)
         //puts ("<pair>\n");
         //if (cont != cell_f) puts "(");
         puts ("(");
-        if (x && x != cell_nil) display_ (CAR (x));
+        if (x && x != cell_nil)
+          display_ (CAR (x));
         if (CDR (x) && CDR (x) != cell_nil)
           {
 #if __GNUC__
@@ -678,17 +735,29 @@ display_ (SCM x)
       {
         switch (x)
           {
-          case 1: {puts ("()"); break;}
-          case 2: {puts ("#f"); break;}
-          case 3: {puts ("#t"); break;}
+          case 1:
+            {
+              puts ("()");
+              break;
+            }
+          case 2:
+            {
+              puts ("#f");
+              break;
+            }
+          case 3:
+            {
+              puts ("#t");
+              break;
+            }
           default:
             {
 #if __GNUC__
-        puts ("<x:");
-        puts (itoa (x));
-        puts (">");
+              puts ("<x:");
+              puts (itoa (x));
+              puts (">");
 #else
-        puts ("<x>");
+              puts ("<x>");
 #endif
             }
           }
@@ -698,24 +767,64 @@ display_ (SCM x)
       {
         switch (x)
           {
-          case 11: {puts (" . "); break;}
-          case 12: {puts ("lambda"); break;}
-          case 13: {puts ("begin"); break;}
-          case 14: {puts ("if"); break;}
-          case 15: {puts ("quote"); break;}
-          case 37: {puts ("car"); break;}
-          case 38: {puts ("cdr"); break;}
-          case 39: {puts ("null?"); break;}
-          case 40: {puts ("eq?"); break;}
-          case 41: {puts ("cons"); break;}
+          case 11:
+            {
+              puts (" . ");
+              break;
+            }
+          case 12:
+            {
+              puts ("lambda");
+              break;
+            }
+          case 13:
+            {
+              puts ("begin");
+              break;
+            }
+          case 14:
+            {
+              puts ("if");
+              break;
+            }
+          case 15:
+            {
+              puts ("quote");
+              break;
+            }
+          case 37:
+            {
+              puts ("car");
+              break;
+            }
+          case 38:
+            {
+              puts ("cdr");
+              break;
+            }
+          case 39:
+            {
+              puts ("null?");
+              break;
+            }
+          case 40:
+            {
+              puts ("eq?");
+              break;
+            }
+          case 41:
+            {
+              puts ("cons");
+              break;
+            }
           default:
             {
 #if __GNUC__
-        puts ("<s:");
-        puts (itoa (x));
-        puts (">");
+              puts ("<s:");
+              puts (itoa (x));
+              puts (">");
 #else
-        puts ("<s>");
+              puts ("<s>");
 #endif
             }
           }
@@ -740,16 +849,20 @@ display_ (SCM x)
 }
 
 SCM
-simple_bload_env (SCM a) ///((internal))
+simple_bload_env (SCM a)        ///((internal))
 {
   puts ("reading: ");
   char *mo = "module/mes/tiny-0-32.mo";
   puts (mo);
   puts ("\n");
   __stdin = open (mo, 0);
-  if (__stdin < 0) {eputs ("no such file: module/mes/tiny-0-32.mo\n");return 1;}
+  if (__stdin < 0)
+    {
+      eputs ("no such file: module/mes/tiny-0-32.mo\n");
+      return 1;
+    }
 
-  char *p = (char*)g_cells;
+  char *p = (char *) g_cells;
   int c;
 
   assert (getchar () == 'M');
@@ -773,17 +886,19 @@ simple_bload_env (SCM a) ///((internal))
 
   puts ("read done\n");
 
-  g_free = (p-(char*)g_cells) / sizeof (struct scm);
-  
-  if (g_free != 15) exit (33);
-  
+  g_free = (p - (char *) g_cells) / sizeof (struct scm);
+
+  if (g_free != 15)
+    exit (33);
+
   g_symbols = 1;
 
   __stdin = STDIN;
   r0 = mes_builtins (r0);
-  
-  if (g_free != 19) exit (34);
-  
+
+  if (g_free != 19)
+    exit (34);
+
   puts ("cells read: ");
   puts (itoa (g_free));
   puts ("\n");
@@ -820,46 +935,55 @@ int
 main (int argc, char *argv[])
 {
   puts ("Hello cons-mes!\n");
-  if (argc > 1 && !strcmp (argv[1], "--help")) return eputs ("Usage: mes [--dump|--load] < FILE");
+  if (argc > 1 && !strcmp (argv[1], "--help"))
+    return eputs ("Usage: mes [--dump|--load] < FILE");
 #if __GNUC__
-  if (argc > 1 && !strcmp (argv[1], "--version")) {eputs ("Mes ");return eputs (VERSION);};
+  if (argc > 1 && !strcmp (argv[1], "--version"))
+    {
+      eputs ("Mes ");
+      return eputs (VERSION);
+    };
 #else
-  if (argc > 1 && !strcmp (argv[1], "--version")) {eputs ("Mes ");return eputs ("0.4");};
+  if (argc > 1 && !strcmp (argv[1], "--version"))
+    {
+      eputs ("Mes ");
+      return eputs ("0.4");
+    };
 #endif
   __stdin = STDIN;
 
   r0 = mes_environment ();
-  
+
   SCM program = simple_bload_env (r0);
 
   puts ("g_free=");
-  puts (itoa(g_free));
+  puts (itoa (g_free));
   puts ("\n");
 
   push_cc (r2, cell_unspecified, r0, cell_unspecified);
 
   puts ("g_free=");
-  puts (itoa(g_free));
+  puts (itoa (g_free));
   puts ("\n");
 
   puts ("g_stack=");
-  puts (itoa(g_stack));
+  puts (itoa (g_stack));
   puts ("\n");
 
   puts ("r0=");
-  puts (itoa(r0));
+  puts (itoa (r0));
   puts ("\n");
 
   puts ("r1=");
-  puts (itoa(r1));
+  puts (itoa (r1));
   puts ("\n");
 
   puts ("r2=");
-  puts (itoa(r2));
+  puts (itoa (r2));
   puts ("\n");
 
   puts ("r3=");
-  puts (itoa(r3));
+  puts (itoa (r3));
   puts ("\n");
 
   r3 = cell_vm_apply;
@@ -869,4 +993,3 @@ main (int argc, char *argv[])
   eputs ("\n");
   return 0;
 }
-
index 4dda7a7cfb71cb645e9ce6fc0bc719cc3f95f606..f161eb369382530c736b5908bf9f7ab3ac95b094 100644 (file)
@@ -35,10 +35,10 @@ int g_free = 0;
 
 SCM g_symbols = 0;
 SCM g_stack = 0;
-SCM r0 = 0; // a/env
-SCM r1 = 0; // param 1
-SCM r2 = 0; // save 2+load/dump
-SCM r3 = 0; // continuation
+SCM r0 = 0;                     // a/env
+SCM r1 = 0;                     // param 1
+SCM r2 = 0;                     // save 2+load/dump
+SCM r3 = 0;                     // continuation
 
 SCM
 mes_environment ()
@@ -47,7 +47,7 @@ mes_environment ()
 }
 
 SCM
-bload_env (SCM a) ///((internal))
+bload_env (SCM a)               ///((internal))
 {
   eputs ("bload_env\n");
   return 0;
@@ -57,7 +57,7 @@ int
 main (int argc, char *argv[])
 {
 #if __GNUC__
-  g_debug = (int)getenv ("MES_DEBUG");
+  g_debug = (int) getenv ("MES_DEBUG");
 #endif
   //if (getenv ("MES_ARENA")) ARENA_SIZE = atoi (getenv ("MES_ARENA"));
 
index 0111a22312826f0e1ee7d0908e1809c673552d87..58b28ef9c8606f0f13cfc87d5a58e57de24aac6c 100644 (file)
@@ -29,8 +29,9 @@ main (int argc, char *argv[])
   int c = getchar ();
   if (c != 'm')
     return 1;
-  while (c != EOF) {
-    putchar (c);
-    c = getchar ();
-  }
+  while (c != EOF)
+    {
+      putchar (c);
+      c = getchar ();
+    }
 }
index 69810726976e6407a3d8f3d9d5cfa1e7d47ba975..36c435e8283d7ffa20cada581897d8121b34fffc 100644 (file)
@@ -24,10 +24,10 @@ main ()
   if (0 == 0)
     goto ok;
   return 1;
- ok:
+ok:
   if (0 != 1)
     goto ok1;
   return 1;
- ok1:
+ok1:
   return 0;
 }
index 24a4e6ffc899fc4c925b54bf3ac48e07a636fa96..70977903d4f50ca498758fb7cd2d5c69275b1051 100644 (file)
@@ -24,7 +24,7 @@ main ()
   unsigned char r = -2;
   if (r <= -3)
     return 1;
-  if (r <= (unsigned char)-1)
+  if (r <= (unsigned char) -1)
     return 0;
   return 2;
 }
index dead66e316f6b0b342759964d54fa0c79c74281e..20b77ebca235f709b920d30086b65aad8b3980c9 100644 (file)
@@ -24,7 +24,7 @@ main ()
   unsigned short r = -2;
   if (r <= -3)
     return 1;
-  if (r <= (unsigned short)-1)
+  if (r <= (unsigned short) -1)
     return 0;
   return 2;
 }
index c778ca0ad71600edaf09b3973947d9ae1eb6ce60..35317af65f9717d2acab6a8a1ebd05e9089c9bed 100644 (file)
@@ -24,7 +24,9 @@ int
 main ()
 {
   int c = 0;
-  {int c = 3;}
+  {
+    int c = 3;
+  }
   if (c)
     return 1;
 
index 0aa4603c3ad3ff89b9e8fcb354197dea9ac9d9c9..d8451d189b2ff1b65bd7cb6c1662ee8587f93b6a 100644 (file)
@@ -37,7 +37,7 @@ print (int a)
 int
 main ()
 {
-  int a[2] = {101, -1};
+  int a[2] = { 101, -1 };
   //eputs ("b:"); eputs (itoa (a[0])); eputs ("\n");
   int r = wrap (print (a[0]));
   if (r != 101)
index 9644cdf6b6263f7146b6bc6ba4cb7cab21bd5914..69d53d38bb05626689e381e31844bbe3ab9207c2 100644 (file)
@@ -79,83 +79,84 @@ main (int c)
     goto ok0;
 
   return 111;
- ok0:
+ok0:
 
   oputs ("t: if (0); return 1; else;\n");
   if (0)
-    return 12; else
+    return 12;
+  else
     goto ok1;
- ok1:
+ok1:
 
   oputs ("t: if (t)\n");
   if (t)
     goto ok2;
 
   return 13;
- ok2:
+ok2:
 
   oputs ("t: if (one > 0)\n");
   if (one > 0)
     goto ok3;
 
   return 14;
- ok3:
+ok3:
 
   oputs ("t: if (one < 2)\n");
   if (one < 2)
     goto ok4;
 
   return 15;
- ok4:
+ok4:
 
   oputs ("t: if (one >= 0)\n");
   if (one >= 0)
     goto ok5;
 
   return 16;
- ok5:
+ok5:
 
   oputs ("t: if (one >= 1)\n");
   if (one >= 0)
     goto ok6;
 
   return 17;
- ok6:
+ok6:
 
   oputs ("t: if (one <= 2)\n");
   if (one <= 2)
     goto ok7;
 
   return 18;
- ok7:
+ok7:
 
   oputs ("t: if (one <= 1)\n");
   if (one <= 1)
     goto ok8;
 
   return 19;
- ok8:
+ok8:
 
   oputs ("t: if (!0)\n");
   if (!0)
     goto ok9;
 
   return 20;
- ok9:
+ok9:
 
   oputs ("t: if (one == 1)\n");
   if (one == 1)
     goto ok10;
 
   return 21;
- ok10:
+ok10:
 
   oputs ("t: if (one != 0)\n");
   if (one != 0)
     goto ok11;
 
   return 22;
- ok11:
+ok11:
   ;
 
   int m1 = -1;
index 8f90f05bade5b02cc45e081721aaf73c43e2df69..39df31f2b3d7f729e57be97e3830ccf0f61076e8 100644 (file)
@@ -47,14 +47,14 @@ main ()
   oputs ("t: if (1 && !0)\n");
   if (1 && !0)
     goto ok0;
-    return 1;
- ok0:
+  return 1;
+ok0:
 
   oputs ("t: if (f || t)\n");
   if (f || t)
     goto ok1;
   return 1;
- ok1:
+ok1:
 
   return 0;
 }
index 6e17654b9d1a83cffd0dc81e60d09777d28d67b8..cbe5512ff2c12f4cc98f42d98fb55f6b6ac09011 100644 (file)
@@ -51,13 +51,13 @@ main ()
   if (++i)
     goto ok0;
   return 1;
- ok0:
+ok0:
 
   oputs ("t: if (i--)\n");
   if (i--)
     goto ok1;
   return 1;
- ok1:
+ok1:
 
   return 0;
 }
index 04f24e7e796e1754172108fbf4803fc9d32d87fd..7a2fb4aa0d1d0a4057d14f015793dc503bc6630c 100644 (file)
@@ -69,35 +69,35 @@ main ()
   if (*g_chars == 'B')
     goto ok1;
   return 1;
-  ok1:
+ok1:
 
   oputs ("t: *x == 'B'\n");
   x = g_arena;
   if (*x == 'B')
     goto ok2;
   return 1;
- ok2:
+ok2:
 
   oputs ("t: *y == 'B'\n");
   y = g_chars;
   if (*y == 'B')
     goto ok3;
   return 1;
- ok3:
+ok3:
 
   oputs ("t: *x == 'R'\n");
   g_chars[0] = 'R';
   if (*x == 'R')
     goto ok4;
   return 1;
- ok4:
+ok4:
 
   oputs ("t: *x++ == 'C'\n");
   *x++ = c;
   if (*g_chars == 'C')
     goto ok5;
   return 1;
- ok5:
+ok5:
 
   return 0;
 }
index 174b876a7190e857bf660e2561e417000f547f8c..29df580e47e2f9a5fffb018a6d28b73cf052a121 100644 (file)
@@ -20,7 +20,9 @@
 
 #include <mes/lib-mini.h>
 
-enum type_t {TCHAR, TCLOSURE, TCONTINUATION, TFUNCTION, TKEYWORD, TMACRO, TNUMBER, TPAIR, TREF, TSPECIAL, TSTRING, TSYMBOL, TVALUES, TVECTOR, TBROKEN_HEART};
+enum type_t
+{ TCHAR, TCLOSURE, TCONTINUATION, TFUNCTION, TKEYWORD, TMACRO, TNUMBER, TPAIR, TREF, TSPECIAL, TSTRING,
+    TSYMBOL, TVALUES, TVECTOR, TBROKEN_HEART };
 
 int
 add (int a, int b)
@@ -102,13 +104,13 @@ main ()
   if (strlen ("."))
     goto ok1;
   return 11;
- ok1:
+ok1:
 
   oputs ("t: if (strlen (p) == 3)\n");
   if (strlen (p) == 3)
     goto ok2;
   return 12;
- ok2:
+ok2:
 
   return 0;
 }
index 75c3297f1fb01e90dc2f6ccd0ffe806cf9002ef8..322d56b49b954da5e1c72c20c2f9f77c80b3a587 100644 (file)
@@ -23,7 +23,7 @@
 int
 label (int c)
 {
- label:
+label:
   if (c == 0)
     return c;
   c--;
index 81a626610e51703b23e0ab72216594a2c62b5fff..acc686a51c1323824d4496acb6fe052420012ed8 100644 (file)
@@ -32,14 +32,14 @@ main ()
   oputs ("\n");
 
   oputs ("t: for (i=1; i<5; ++i)\n");
-  for (i=1; i<5; ++i)
+  for (i = 1; i < 5; ++i)
     ;
   if (i != 5)
     return i;
 
   oputs ("t: while (i<3) i++\n");
   i = 1;
-  while (i<3)
+  while (i < 3)
     i++;
   if (i != 3)
     return i;
@@ -47,8 +47,8 @@ main ()
   oputs ("t: do i-- while (i>0)\n");
   do
     i--;
-  while (i>0)
-    ;
+  while (i > 0)
+  ;
   if (i != 0)
     return 1;
 
@@ -59,7 +59,7 @@ main ()
   oputs ("t: while (1) ... break;\n");
   while (1)
     {
-      f=0;
+      f = 0;
       break;
     }
 
@@ -75,7 +75,7 @@ main ()
   while (one--)
     {
       continue;
-      one=1;
+      one = 1;
     }
   one += 2;
 
@@ -84,7 +84,7 @@ main ()
     {
       goto ok1;
     }
- ok1:
+ok1:
 
   return 0;
 }
index affa844b12080e7468925c5631d5e3bfaa7cd154..1085081c068af48ff4d2fa34fb195895170adec3 100644 (file)
@@ -25,19 +25,20 @@ main ()
 {
   int r;
   int i = 2;
-  switch (i) {
-    // case 0:
-    //   r = 0;
-    //   break;
-    // case 1:
-    //   r = 1;
-    //   break;
+  switch (i)
+    {
+      // case 0:
+      //   r = 0;
+      //   break;
+      // case 1:
+      //   r = 1;
+      //   break;
     case 2:
       r = 2;
     default:
       r++;
       break;
-  }
+    }
 
   if (r != 3)
     return 1;
index 5ac83ff78e224a59d0f7bf56b3bab734e1a2452d..eadd73da052a75872d49ddb30b3d0f887c0f5d2c 100644 (file)
@@ -25,18 +25,19 @@ main ()
 {
   int r;
   int i = 2;
-  switch (i) {
-    // case 0:
-    //   r = 0;
-    //   break;
-    // case 1:
-    //   r = 1;
-    //   break;
+  switch (i)
+    {
+      // case 0:
+      //   r = 0;
+      //   break;
+      // case 1:
+      //   r = 1;
+      //   break;
     case 2:
     default:
       r = 2;
       break;
-  }
+    }
 
   if (r != 2)
     return 1;
index 6f238d8db02acc97952815a5d571fc2e081a5ebb..fa6a47166c40b1175faa4bea7964063323ded8d3 100644 (file)
@@ -20,7 +20,9 @@
 
 #include <mes/lib-mini.h>
 
-enum type_t {TCHAR, TCLOSURE, TCONTINUATION, TFUNCTION, TKEYWORD, TMACRO, TNUMBER, TPAIR, TREF, TSPECIAL, TSTRING, TSYMBOL, TVALUES, TVECTOR, TBROKEN_HEART};
+enum type_t
+{ TCHAR, TCLOSURE, TCONTINUATION, TFUNCTION, TKEYWORD, TMACRO, TNUMBER, TPAIR, TREF, TSPECIAL, TSTRING,
+    TSYMBOL, TVALUES, TVECTOR, TBROKEN_HEART };
 
 int
 swits (int c)
@@ -52,7 +54,7 @@ swits (int c)
     }
 
   return 1;
- next:
+next:
   switch (c)
     {
     case 0:
@@ -96,7 +98,8 @@ default_first (int c)
     there:
     case 0:
       ;
-      {}
+      {
+      }
       return 0;
     }
   return -1;
@@ -153,7 +156,7 @@ main ()
       break;
     }
 
-  if (i!= 0)
+  if (i != 0)
     return 16;
 
   i = 2;
index f818322b90760663259377c6dbe1eb87c3e497f6..ee1beeb8965ecc1bf17eda6096e957be91f6f0da 100644 (file)
@@ -24,7 +24,7 @@ int g_time = 1;
 #define time time_
 #endif
 
-int*
+int *
 time ()
 {
   return &g_time;
index e5986d55936503eaf161b8622108d0e49df6ba0e..cb82197aa95364fcea9a88e9c61d3b8523a3d7ae 100644 (file)
@@ -25,7 +25,7 @@
 static int sint;
 static int sint2, sint3;
 typedef unsigned int size;
-static void*
+static void *
 test (size u)
 {
   void *r;
@@ -37,7 +37,7 @@ static int i = 2;
 int
 main ()
 {
-  void (*foo)() = &test;
+  void (*foo) () = &test;
   test (0);
   return 0;
 }
index c289d2393a8f68b2b047fa84fbf94f7241ab202f..76f671caefc48fbed7593edea5e810752a2976e2 100644 (file)
@@ -25,7 +25,9 @@ main ()
 {
   int **p = 1;
   int **q = -1;
-  oputs ("p - q"); oputs (itoa (p - q)); oputs ("\n");
+  oputs ("p - q");
+  oputs (itoa (p - q));
+  oputs ("\n");
 
   return 0;
 }
index 3388a02e1fdb67ce1a4895e5a50e459c7975209b..baba655c166cdb7a4191f8236f522efe23ada27e 100644 (file)
@@ -26,7 +26,9 @@
 int
 main (int argc, char *argv[])
 {
-  oputs ("argc="); oputs (itoa (argc)); oputs ("\n");
+  oputs ("argc=");
+  oputs (itoa (argc));
+  oputs ("\n");
   if (argc != 1)
     return 1;
 
index cdabdc39e553251700432407d6a5299488588adf..7b9965e41441a305918b1792697e65156839fe89 100644 (file)
@@ -28,7 +28,9 @@ main (int argc, char *argv[])
 {
   oputs ("\n");
   oputs ("t: argv[0] == \"scaffold/test....\"\n");
-  oputs ("argv0="); oputs (argv[0]); oputs ("\n");
+  oputs ("argv0=");
+  oputs (argv[0]);
+  oputs ("\n");
   if (strncmp (argv[0], "scaffold/test", 5))
     return 1;
 
index 34d2485bf8eebfbfaf7c4adc9c39e169678d5980..41b327e51eda799662976cc533ba572bb0ab115b 100644 (file)
  * along with GNU Mes.  If not, see <http://www.gnu.org/licenses/>.
  */
 
-char g_hello[] =
-    "hello\n"
-    "world\n"
-  ;
-
-char *g_hello2 =
-    "hello\n"
-    "world\n"
-  ;
-
-char g_hello3[] =
-  {
-    'h', 'e', 'l', 'l', 'o', '\n',
-    'w', 'o', 'r', 'l', 'd', '\n',
-    '\0',
-  }
-  ;
-
-int g_hello_int[] = {0, 1, 2, 3, 4, 5};
+char g_hello[] = "hello\n" "world\n";
+
+char *g_hello2 = "hello\n" "world\n";
+
+char g_hello3[] = {
+  'h', 'e', 'l', 'l', 'o', '\n',
+  'w', 'o', 'r', 'l', 'd', '\n',
+  '\0',
+}
+
+;
+
+int g_hello_int[] = { 0, 1, 2, 3, 4, 5 };
 
 int
 main (int argc)
index dd06370c9031695cccc02609ce63e55e4434d0a2..19d7edd2187339502e079100089d96ad9ec23569 100644 (file)
@@ -78,13 +78,13 @@ main ()
   if (1 == inc (0))
     goto ok0;
   return 10;
- ok0:
+ok0:
 
   oputs ("t: 0 < inc (0)\n");
   if (0 < inc (0))
     goto ok1;
   return 11;
- ok1:
+ok1:
 
   oputs ("t: inc (0) + 2 != 3\n");
   if (inc (0) + inc (1) != 3)
@@ -92,7 +92,7 @@ main ()
 
   oputs ("t: 4/2=");
   i = 4 / 2;
-  if (i!=2)
+  if (i != 2)
     return 13;
   i += 48;
   putchar (i);
@@ -100,17 +100,17 @@ main ()
 
   oputs ("t: 3*4=\n");
   i = 3 * 4;
-  if (i!=12)
+  if (i != 12)
     return 14;
 
   oputs ("t: i /= 4\n");
   i /= 4;
-  if (i!=3)
+  if (i != 3)
     return 15;
 
   oputs ("t: i *= 4\n");
   i *= 4;
-  if (i!=12)
+  if (i != 12)
     return 16;
 
   oputs ("t: 1 << 3\n");
@@ -159,11 +159,11 @@ main ()
     return 27;
 
   oputs ("t: 3 == 3\n");
-  if ((3 == 3) !=  1)
+  if ((3 == 3) != 1)
     return 28;
 
   oputs ("t: 3 != 3\n");
-  if ((3 != 3) !=  0)
+  if ((3 != 3) != 0)
     return 29;
 
   oputs ("t: 011 == 15\n");
@@ -171,7 +171,7 @@ main ()
     return 30;
 
   oputs ("t: 0b11 == 3\n");
-  if (0b11 != 3)
+  if (0 b11 != 3)
     return 31;
 
   oputs ("t: 0x11 == 3\n");
index 754393f9700e96dcb1e750d2fa413c43d7467791..a3056101b1166056c166a7cea2bec49f4a35eb2e 100644 (file)
 #include <stdlib.h>
 #include <string.h>
 
-char *env[] = {"foo", "bar", "baz", 0};
+char *env[] = { "foo", "bar", "baz", 0 };
 
-#if 0//!WITH_GLIBC
+#if 0                           //!WITH_GLIBC
 #define getenv xgetenv
 
 char *
-getenv (char consts)
+getenv (char const *s)
 {
   eputs ("getenv\n");
   char **p = environ;
   int length = strlen (s);
-  eputs ("getenv length="); eputs (itoa (length)); eputs ("\n");
+  eputs ("getenv length=");
+  eputs (itoa (length));
+  eputs ("\n");
   while (*p)
     {
-      eputs ("*p="); eputs (*p); eputs ("\n");;
-      eputs (" p="); eputs (itoa ((long)p)); eputs ("\n");
+      eputs ("*p=");
+      eputs (*p);
+      eputs ("\n");;
+      eputs (" p=");
+      eputs (itoa ((long) p));
+      eputs ("\n");
       if (!strncmp (s, *p, length) && *(*p + length) == '=')
         return (*p + length + 1);
       p++;
@@ -56,18 +62,18 @@ test (char **e)
   oputs ("\n");
   oputs ("a[i] = i-1\n");
   int a[3];
-  for (int i=0; i < 3; i++)
-    a[i] = i-1;
-  for (int i=0; i < 3; i++)
-    if (a[i] != i-1)
-    return 1;
+  for (int i = 0; i < 3; i++)
+    a[i] = i - 1;
+  for (int i = 0; i < 3; i++)
+    if (a[i] != i - 1)
+      return 1;
 
   oputs ("env [");
-  oputs (itoa ((long)env));
+  oputs (itoa ((long) env));
   oputs ("]\n");
 
   oputs ("e [");
-  oputs (itoa ((int)e));
+  oputs (itoa ((int) e));
   oputs ("]\n");
 
   oputs ("env [0] == \"foo\"\n");
@@ -84,7 +90,7 @@ test (char **e)
   while (*pp)
     {
       oputs ("pp [");
-      oputs (itoa ((int)pp));
+      oputs (itoa ((int) pp));
       oputs ("]: ");
       if (*pp)
         oputs (*pp);
@@ -110,7 +116,7 @@ test (char **e)
     return 6;
 
   oputs ("t: buf + 1\n");
-  if (*(buf+1) != 'e')
+  if (*(buf + 1) != 'e')
     return 7;
 
   char **p = &buf;
index cfb20a87d5186b59e070fbe1002b25096e60eb7f..7f2dcad8d595aa6acc99d057e24f0eb93ba4d32f 100644 (file)
  */
 
 #include <string.h>
-int one_two_three[3] =
-{
+int one_two_three[3] = {
   1, 2, 3
 };
 
-char *foo_bar_baz[3] =
-{
+char *foo_bar_baz[3] = {
   "foo", "bar", "baz"
 };
 
-char foo_bar_baz_haha[3][4] =
-{
+char foo_bar_baz_haha[3][4] = {
   "foo", "bar", "baz"
 };
 
@@ -38,18 +35,25 @@ char *foo = "foo";
 char *bar = "bar";
 char *baz = "baz";
 
-char *foo_bar_baz_mwhuhahaha[3] =
-{
+char *foo_bar_baz_mwhuhahaha[3] = {
   &foo, &bar, &baz
 };
 
 int
 main ()
 {
-  puts ("one:"); puts (itoa (one_two_three[0])); puts ("\n");
-  puts ("foo:"); puts (foo_bar_baz[1]); puts ("\n");
-  puts ("bar:"); puts (foo_bar_baz_haha[2]); puts ("\n");
+  puts ("one:");
+  puts (itoa (one_two_three[0]));
+  puts ("\n");
+  puts ("foo:");
+  puts (foo_bar_baz[1]);
+  puts ("\n");
+  puts ("bar:");
+  puts (foo_bar_baz_haha[2]);
+  puts ("\n");
   char *p = foo_bar_baz_haha[2];
-  puts ("baz:"); puts (p); puts ("\n");
+  puts ("baz:");
+  puts (p);
+  puts ("\n");
   return strcmp (foo_bar_baz[2], "baz");
 }
index 093c2a67b7da9e68d088bf5886c38b68bf90cf45..7c7550190a2c9cb6c9f4704391ee57c25de3cc64 100644 (file)
@@ -29,7 +29,7 @@ struct scm
 
 
 char g_arena[24];
-struct scm *g_cells = (struct scm*)g_arena;
+struct scm *g_cells = (struct scm *) g_arena;
 
 int
 main ()
index d0db546c8642f0adcc7ad2c088eecde2344f307d..e6d2a2df37d30583de1416d12a17d664dd83dc68 100644 (file)
@@ -29,7 +29,7 @@ struct scm
 
 
 char g_arena[24];
-struct scm *g_cells = (struct scm*)g_arena;
+struct scm *g_cells = (struct scm *) g_arena;
 
 int
 main ()
@@ -45,7 +45,7 @@ main ()
   if (g_cells[0].type == g_cells[1].type)
     goto ok;
   return 1;
- ok:
+ok:
 
   return 0;
 }
index eb6aecd531a8a2dcb4408c271c707701b677d65b..45c73db912249919b2bd1d7dd042db5d07447f22 100644 (file)
@@ -29,7 +29,7 @@ struct scm
 
 
 char g_arena[12];
-struct scm *g_cells = (struct scm*)g_arena;
+struct scm *g_cells = (struct scm *) g_arena;
 
 int
 main ()
index 6c17d7068636931c017db880e48dbfbc95fa1f35..462a48ccf8487c287b7f8192c268c7035c16d796 100644 (file)
@@ -28,8 +28,8 @@ struct scm
 };
 
 
-struct scm a = {-1, 0,-1};
-struct scm b = { 0,-1, 0};
+struct scm a = { -1, 0, -1 };
+struct scm b = { 0, -1, 0 };
 
 int
 main ()
index 2b5a30049741921cc880f4a2f8abd7a89b755c2a..2af86e0c54a011cadb3a9c7cffb77b1cc68d4e71 100644 (file)
@@ -36,7 +36,8 @@ inc (int i)
   return i + 1;
 }
 
-struct scm {
+struct scm
+{
   int type;
   int car;
   int cdr;
@@ -47,12 +48,24 @@ char g_arena[84];
 #if __MESC__
 struct scm *g_cells = g_arena;
 #else
-struct scm *g_cells = (struct scm*)g_arena;
+struct scm *g_cells = (struct scm *) g_arena;
 #endif
 char *g_chars = g_arena;
 
-int foo () {oputs ("t: foo\n"); return 0;};
-int bar (int i) {oputs ("t: bar\n"); return 0;};
+int
+foo ()
+{
+  oputs ("t: foo\n");
+  return 0;
+};
+
+int
+bar (int i)
+{
+  oputs ("t: bar\n");
+  return 0;
+};
+
 struct function
 {
   int (*function) (void);
@@ -60,9 +73,9 @@ struct function
   //long arity;
   char *name;
 };
-struct function g_fun = {&exit,1,"fun"};
-struct function g_foo = {&foo,0,"foo"};
-struct function g_bar = {&bar,1,"bar"};
+struct function g_fun = { &exit, 1, "fun" };
+struct function g_foo = { &foo, 0, "foo" };
+struct function g_bar = { &bar, 1, "bar" };
 
 void *functions[2];
 //int functions[2];
@@ -70,7 +83,9 @@ void *functions[2];
 struct function g_functions[2];
 int g_function = 0;
 
-enum type_t {TCHAR, TCLOSURE, TCONTINUATION, TFUNCTION, TKEYWORD, TMACRO, TNUMBER, TPAIR, TREF, TSPECIAL, TSTRING, TSYMBOL, TVALUES, TVECTOR, TBROKEN_HEART};
+enum type_t
+{ TCHAR, TCLOSURE, TCONTINUATION, TFUNCTION, TKEYWORD, TMACRO, TNUMBER, TPAIR, TREF, TSPECIAL, TSTRING,
+    TSYMBOL, TVALUES, TVECTOR, TBROKEN_HEART };
 
 typedef int SCM;
 int g_free = 3;
@@ -85,7 +100,8 @@ int ARENA_SIZE = 200;
 
 #define CAAR(x) CAR (CAR (x))
 
-struct scm scm_fun = {TFUNCTION,0,0};
+struct scm scm_fun = { TFUNCTION, 0, 0 };
+
 SCM cell_fun;
 
 
@@ -123,7 +139,7 @@ main ()
   TYPE (1) = 1;
   CAR (1) = 2;
   CDR (1) = 3;
-  g_cells[0+add(0, 0)] = g_cells[0+inc(0)];
+  g_cells[0 + add (0, 0)] = g_cells[0 + inc (0)];
   if (TYPE (0) != 1)
     return 7;
   if (CAR (0) != 2)
@@ -142,7 +158,7 @@ main ()
   if (TYPE (0) == TYPE (1))
     goto ok;
   return 10;
- ok:
+ok:
 
   g_cells[0].car = 1;
   g_cells[1].car = 2;
@@ -182,7 +198,7 @@ main ()
     return 17;
 
   oputs ("t: struct fun = {&exit,1,\"exit\"};\n");
-  struct function fun = {&exit,1,"exit"};
+  struct function fun = { &exit, 1, "exit" };
 
   oputs ("t: fun.arity != 1;\n");
   if (fun.arity != 1)
@@ -204,7 +220,7 @@ main ()
   g_functions[g_function++] = g_foo;
 
   oputs ("t: pbar->arity == 1\n");
-  struct functionbarp = &g_bar;
+  struct function *barp = &g_bar;
   if (barp->arity != 1)
     return 22;
 
index 1e0d65245aa9974107c568809d902b7b771cc7c5..7bb73614525ef53720acb1d93155ec0b6e3e68df 100644 (file)
@@ -27,7 +27,8 @@ struct function
   int arity;
   char *name;
 };
-struct function g_fun = {&exit,1,"fun"};
+struct function g_fun = { &exit, 1, "fun" };
+
 int functions[2];
 int g_function = 0;
 
index 52c8a14cc5a7de6591269599a0f95a13f871c86a..7344bc8e6963692328dd8965841d11474614dd76 100644 (file)
@@ -30,7 +30,7 @@ struct scm
 int
 main ()
 {
-  struct scm a = {-1, 0,-1};
+  struct scm a = { -1, 0, -1 };
 
   if (a.type != -1)
     return 1;
index 8e9115ec63fbecaf56ae44ab1cf6bea32ce5e8e1..4019eeef91f0f9adced9f88d606127596634d7a7 100644 (file)
@@ -27,7 +27,8 @@ struct scm
   int cdr;
 };
 
-struct scm a = {-1, 0,-1};
+struct scm a = { -1, 0, -1 };
+
 struct scm *p = &a;
 
 int
index 2b3392370b39a3fb1eeffcc54c41ccd17b92bc46..78212d9a7a06e001e844871c876d118f4d85de49 100644 (file)
@@ -27,7 +27,7 @@ struct scm
   int cdr;
 };
 
-struct scm a = {-1, 0,-1};
+struct scm a = { -1, 0, -1 };
 
 int
 main ()
index 5845c98d3707473ad919c450d1da4dcf8ceb4465..33a3b1f8bc3fb6cf7f16627ad08417aa5160cdfe 100644 (file)
@@ -24,7 +24,8 @@
 #include <stdlib.h>
 #include <string.h>
 
-struct scm {
+struct scm
+{
   int type;
   int car;
   int cdr;
@@ -32,19 +33,32 @@ struct scm {
 
 int bla = 1234;
 char g_arena[84];
-struct scm *g_cells = (struct scm*)g_arena;
+struct scm *g_cells = (struct scm *) g_arena;
 char *g_chars = g_arena;
 
-int foo () {oputs ("t: foo\n"); return 0;};
-int bar (int i) {oputs ("t: bar\n"); return 0;};
-struct function {
+int
+foo ()
+{
+  oputs ("t: foo\n");
+  return 0;
+};
+
+int
+bar (int i)
+{
+  oputs ("t: bar\n");
+  return 0;
+};
+
+struct function
+{
   int (*function) (void);
   int arity;
   char *name;
 };
-struct function g_fun = {&exit,1,"fun"};
-struct function g_foo = {&foo,0,"foo"};
-struct function g_bar = {&bar,1,"bar"};
+struct function g_fun = { &exit, 1, "fun" };
+struct function g_foo = { &foo, 0, "foo" };
+struct function g_bar = { &bar, 1, "bar" };
 
 //void *functions[2];
 int functions[2];
@@ -52,7 +66,9 @@ int functions[2];
 struct function g_functions[2];
 int g_function = 0;
 
-enum type_t {TCHAR, TCLOSURE, TCONTINUATION, TFUNCTION, TKEYWORD, TMACRO, TNUMBER, TPAIR, TREF, TSPECIAL, TSTRING, TSYMBOL, TVALUES, TVECTOR, TBROKEN_HEART};
+enum type_t
+{ TCHAR, TCLOSURE, TCONTINUATION, TFUNCTION, TKEYWORD, TMACRO, TNUMBER, TPAIR, TREF, TSPECIAL, TSTRING,
+    TSYMBOL, TVALUES, TVECTOR, TBROKEN_HEART };
 
 typedef int SCM;
 int g_free = 3;
@@ -67,7 +83,8 @@ int ARENA_SIZE = 200;
 
 #define CAAR(x) CAR (CAR (x))
 
-struct scm scm_fun = {TFUNCTION,0,0};
+struct scm scm_fun = { TFUNCTION, 0, 0 };
+
 SCM cell_fun;
 
 SCM
@@ -85,18 +102,25 @@ make_cell (SCM type, SCM car, SCM cdr)
   oputs ("030\n");
   SCM x = alloc (1);
   TYPE (x) = VALUE (type);
-  if (VALUE (type) == TCHAR || VALUE (type) == TNUMBER) {
-    if (car) CAR (x) = CAR (car);
-    if (cdr) CDR(x) = CDR(cdr);
-  }
-  else if (VALUE (type) == TFUNCTION) {
-    if (car) CAR (x) = car;
-    if (cdr) CDR(x) = CDR(cdr);
-  }
-  else {
-    CAR (x) = car;
-    CDR(x) = cdr;
-  }
+  if (VALUE (type) == TCHAR || VALUE (type) == TNUMBER)
+    {
+      if (car)
+        CAR (x) = CAR (car);
+      if (cdr)
+        CDR (x) = CDR (cdr);
+    }
+  else if (VALUE (type) == TFUNCTION)
+    {
+      if (car)
+        CAR (x) = car;
+      if (cdr)
+        CDR (x) = CDR (cdr);
+    }
+  else
+    {
+      CAR (x) = car;
+      CDR (x) = cdr;
+    }
   return x;
 }
 
@@ -112,7 +136,7 @@ make_cell_test ()
 }
 
 SCM
-make_tmps_test (struct scm* cells)
+make_tmps_test (struct scm * cells)
 {
   oputs ("t: tmp = g_free++\n");
   tmp = g_free++;
index a492fa1eaeec3fe03abd4fdb43e22ea154ee792b..c96417d7e4fd4b3bf5ba7886a0e6915bd559d643 100644 (file)
@@ -35,7 +35,7 @@ char g_arena[84];
 #if __MESC__
 struct scm *g_cells = g_arena;
 #else
-struct scm *g_cells = (struct scm*)g_arena;
+struct scm *g_cells = (struct scm *) g_arena;
 #endif
 char *g_chars = g_arena;
 
@@ -51,7 +51,7 @@ get ()
 int
 main ()
 {
-  char *p = (char*)g_chars;
+  char *p = (char *) g_chars;
   int i = 0;
 
   oputs ("\n: ");
index 71d26db2bde62888b0e676a3b52b158d61dece96..37433f1f77f839c1ce2294e6703087d6bb9e3300 100644 (file)
@@ -46,33 +46,35 @@ calloc (size_t nmemb, size_t size)
 }
 
 /* {'0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'A', 'B', 'C', 'D', 'E', 'F'} */
-char little_endian_table[16] = {0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46};
+char little_endian_table[16] =
+  { 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46 };
 
-char*
-little_endian (unsigned value, charc, int number_of_bytes)
+char *
+little_endian (unsigned value, char *c, int number_of_bytes)
 {
-  char table[16] = {0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46};
+  char table[16] =
+    { 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46 };
 
-  switch(number_of_bytes)
+  switch (number_of_bytes)
     {
     case 4:
       {
         c[6] = table[value >> 28];
-        c[7] = table[(value >> 24)% 16];
+        c[7] = table[(value >> 24) % 16];
       }
     case 3:
       {
-        c[4] = table[(value >> 20)% 16];
-        c[5] = table[(value >> 16)% 16];
+        c[4] = table[(value >> 20) % 16];
+        c[5] = table[(value >> 16) % 16];
       }
     case 2:
       {
-        c[2] = table[(value >> 12)% 16];
-        c[3] = table[(value >> 8)% 16];
+        c[2] = table[(value >> 12) % 16];
+        c[3] = table[(value >> 8) % 16];
       }
     case 1:
       {
-        c[0] = table[(value >> 4)% 16];
+        c[0] = table[(value >> 4) % 16];
         c[1] = table[value % 16];
         break;
       }
@@ -85,19 +87,25 @@ little_endian (unsigned value, char* c, int number_of_bytes)
 int
 main ()
 {
-  char table[3] = {'0', '1', '2'};
+  char table[3] = { '0', '1', '2' };
 
   char *s;
   s = calloc (10, sizeof (char));
-  eputs ("2="); eputs (little_endian (2, s, 1)); eputs ("\n");
+  eputs ("2=");
+  eputs (little_endian (2, s, 1));
+  eputs ("\n");
   if (strcmp (s, "02"))
     return 1;
 
-  eputs ("8="); eputs (little_endian (8, s, 2)); eputs ("\n");
+  eputs ("8=");
+  eputs (little_endian (8, s, 2));
+  eputs ("\n");
   if (strcmp (s, "0800"))
     return 2;
 
-  eputs ("16="); eputs (little_endian (16, s, 4)); eputs ("\n");
+  eputs ("16=");
+  eputs (little_endian (16, s, 4));
+  eputs ("\n");
   if (strcmp (s, "10000000"))
     return 3;
 
index 3c2c9ff078843b3337d949e694b81e6d63d451e2..28182f11c287f5ec7859abce2ff3c5aaa6454222 100644 (file)
@@ -23,7 +23,7 @@
 
 int
 //stdarg1 (long one, ...)
-stdarg1 (longone, ...)
+stdarg1 (long *one, ...)
 {
   va_list ap;
   char c;
@@ -37,7 +37,9 @@ stdarg1 (long* one, ...)
 #endif
   c = va_arg (ap, char);
   r = c;
-  eputs ("c:"); eputs (itoa (c)); eputs ("\n");
+  eputs ("c:");
+  eputs (itoa (c));
+  eputs ("\n");
 
   va_end (ap);
   return r;
@@ -45,7 +47,7 @@ stdarg1 (long* one, ...)
 
 int
 ///stdarg2 (long one, long two, ...)
-stdarg2 (long* one, long* two, ...)
+stdarg2 (long *one, long *two, ...)
 {
   va_list ap;
   char c;
@@ -59,7 +61,9 @@ stdarg2 (long* one, long* two, ...)
 #endif
   c = va_arg (ap, char);
   r = c;
-  eputs ("c:"); eputs (itoa (c)); eputs ("\n");
+  eputs ("c:");
+  eputs (itoa (c));
+  eputs ("\n");
 
   va_end (ap);
   return r;
@@ -67,7 +71,7 @@ stdarg2 (long* one, long* two, ...)
 
 int
 //stdarg3 (long one, long two, long three, ...)
-stdarg3 (long *one, long* two, long* three, ...)
+stdarg3 (long *one, long *two, long *three, ...)
 {
   va_list ap;
   char c;
@@ -81,7 +85,9 @@ stdarg3 (long *one, long* two, long* three, ...)
 #endif
   c = va_arg (ap, char);
   r = c;
-  eputs ("c:"); eputs (itoa (c)); eputs ("\n");
+  eputs ("c:");
+  eputs (itoa (c));
+  eputs ("\n");
 
   va_end (ap);
   return r;
index cedabb34506f5d5c841acc5e6af281caf70cf50e..8ef70e932dcb67d4a5290132371477c829692162 100644 (file)
@@ -24,7 +24,7 @@
 
 struct foo;
 
-struct fookrak;
+struct foo *krak;
 
 typedef struct foo foo_struct;
 
@@ -59,8 +59,10 @@ main ()
   printf ("tweetje: %d\n", f.bar[1]);
 
   int *pf = &f;
-  if (*pf != 0x22) return 1;
-  if (*(pf + 1) != 0x34) return 2;
+  if (*pf != 0x22)
+    return 1;
+  if (*(pf + 1) != 0x34)
+    return 2;
 
   struct foo *g = &f;
   printf ("punter eentje: %d\n", g->bar[0]);
@@ -84,7 +86,7 @@ main ()
   oputs (g_foo.name);
 
   char buf[10];
-  struct foos = &buf;
+  struct foo *s = &buf;
   strcpy (s->name, "hi\n");
   oputs (s->name);
 
index dd46f0a083886bdef3098cc9e7e646bff0b0dd3f..1ef83c0a2c66b25d72cf84682d318822d77e15e5 100644 (file)
@@ -34,7 +34,7 @@ typedef struct
 } bar;
 
 
-bar baz[2] = {1, 2, 3, 4, 5, 6};
+bar baz[2] = { 1, 2, 3, 4, 5, 6 };
 
 bar *list[2];
 
@@ -49,19 +49,21 @@ bar *list[2];
 int
 main ()
 {
-  foo f = {1};
+  foo f = { 1 };
   printf ("f.i=%d\n", f.i);
 
-  bar b = {1, 2, &f};
+  bar b = { 1, 2, &f };
   printf ("b.i=%d\n", b.i);
 
   printf ("b.f.i=%d\n", b.f.i);
-  if (b.f.i != 2) return 1;
+  if (b.f.i != 2)
+    return 1;
 
   printf ("b.p->i=%d\n", b.p->i);
-  if (b.p->i != 1) return 2;
+  if (b.p->i != 1)
+    return 2;
 
-  barp = &b;
+  bar *p = &b;
   p->i = 2;
   printf ("p->i=%d\n", b.i);
 
@@ -72,26 +74,31 @@ main ()
   printf ("p->i=%d\n", b.i);
 
   printf ("p->f.i=%d\n", p->f.i);
-  if (p->f.i != 2) return 3;
+  if (p->f.i != 2)
+    return 3;
 
   printf ("p->p->i=%d\n", p->p->i);
-  if (p->p->i != 1) return 4;
+  if (p->p->i != 1)
+    return 4;
 
-  bar** pp = &p;
+  bar **pp = &p;
   (*pp)->i = 3;
   printf ("(*pp)->i=%d\n", b.i);
 
   printf ("sizeof i:%d\n", sizeof (p->i));
-  if ((sizeof p->i) != 4) return 5;
+  if ((sizeof p->i) != 4)
+    return 5;
 
-  printf ("offsetof g=%d\n", (offsetof (bar ,f)));
+  printf ("offsetof g=%d\n", (offsetof (barf)));
 #if __MESC__
   //if ((offsetof (bar ,f)) != 4) return 6;
   //#define offsetof(type, field) (&((type *)0)->field)
-  if ((&((bar *)0)->f) != 4) return 6;
+  if ((&((bar *) 0)->f) != 4)
+    return 6;
 
 #else
-  if ((offsetof (bar ,f)) != 4) return 6;
+  if ((offsetof (bar, f)) != 4)
+    return 6;
 #endif
 
 
index 19205f0cec7f309f1073d28b3ed4625918867bd8..5004cc9f992a2e5fd18df80be2dfa90dc0a34cfa 100644 (file)
@@ -30,7 +30,7 @@ typedef union foo
 int
 main ()
 {
-  union foo f = {48};
+  union foo f = { 48 };
   if (f.i != 48)
     return 1;
 
index 3c4464888528e5158bf1f3a9ccbdae363beb2db0..ac78a1871200b6709141c8ea1716c9d47b4dac69 100644 (file)
@@ -39,12 +39,14 @@ typedef union
 int
 main ()
 {
-  union foo f = {48};
+  union foo f = { 48 };
   printf ("f.i=%d\n", f.i);
   printf ("f.c=%c\n", f.c);
 
-  if (f.i != 48) return 1;
-  if (f.c != '0') return 1;
+  if (f.i != 48)
+    return 1;
+  if (f.c != '0')
+    return 1;
 
   return 0;
 }
index ba2bfa82498840ddcee4d56443608ebd9c728f0f..8263b6dac13c97ba00b9f5e8083c556eea301918 100644 (file)
 #include <stdio.h>
 #include <string.h>
 
-char const* help =
-  "All"
-  " your"
-  " base"
-  " are";
+char const *help = "All" " your" " base" " are";
 
 int global_i = 1;
 int *global_p = &global_i;
@@ -47,5 +43,5 @@ main ()
   if (global_i != 2)
     return global_i;
 
-  return 2,1,0;
+  return 2, 1, 0;
 }
index 08f89399398a7e4cbf96d09742355f02cc1936b3..bc7b51f5a7688be48c99311ece0914f23dccb15e 100644 (file)
@@ -21,7 +21,8 @@
 #include <mes/lib.h>
 #include <stdio.h>
 
-union u {
+union u
+{
   int bar;
   int baz;
 };
@@ -33,7 +34,8 @@ struct foo
 
 struct anon
 {
-  union {
+  union
+  {
     int bar;
     int baz;
   };
@@ -43,17 +45,21 @@ struct anon
 int
 main ()
 {
-  struct foo f = {2};
+  struct foo f = { 2 };
   printf ("f.u.bar=%d\n", f.u.bar);
-  if (f.u.bar != 2) return 1;
+  if (f.u.bar != 2)
+    return 1;
   printf ("f.u.baz=%d\n", f.u.baz);
-  if (f.u.baz != 2) return 1;
+  if (f.u.baz != 2)
+    return 1;
 
-  struct anon a = {2};
+  struct anon a = { 2 };
   printf ("a.bar=%d\n", a.bar);
-  if (a.bar != 2) return 1;
+  if (a.bar != 2)
+    return 1;
   printf ("a.baz=%d\n", a.baz);
-  if (a.baz != 2) return 1;
-  
+  if (a.baz != 2)
+    return 1;
+
   return 0;
 }
index d76c494e1b8d80256360a7020dfdb248b4725ab7..0ba461211473011f614dd25d19ce4fd1ef62c682 100644 (file)
 #include <mes/lib.h>
 #include <stdio.h>
 
-char *list[2] = {"foo\n", "bar\n"};
+char *list[2] = { "foo\n", "bar\n" };
 
-struct foo {
+struct foo
+{
   int a;
   int b;
   int c;
@@ -43,11 +44,17 @@ main ()
   void **ppv = 0;
   int **ppi = 0;
   int int_size = sizeof (int);
-  int ptr_size = sizeof (void*);
+  int ptr_size = sizeof (void *);
   int foo_size = sizeof (struct foo);
-  oputs ("int_size:"); oputs (itoa (int_size)); oputs ("\n");
-  oputs ("ptr_size:"); oputs (itoa (ptr_size)); oputs ("\n");
-  oputs ("foo_size:"); oputs (itoa (foo_size)); oputs ("\n");
+  oputs ("int_size:");
+  oputs (itoa (int_size));
+  oputs ("\n");
+  oputs ("ptr_size:");
+  oputs (itoa (ptr_size));
+  oputs ("\n");
+  oputs ("foo_size:");
+  oputs (itoa (foo_size));
+  oputs ("\n");
   // FIXME: add *14, *18
 #if __i386__
   int foo_size_14 = 224;
@@ -92,81 +99,113 @@ main ()
   if (strcmp (*p, "foo\n"))
     return 14;
 
-  struct foo* pfoo = 0;
-  eputs ("pfoo="); eputs (itoa (pfoo)); eputs ("\n");
+  struct foo *pfoo = 0;
+  eputs ("pfoo=");
+  eputs (itoa (pfoo));
+  eputs ("\n");
   pfoo++;
-  eputs ("pfoo="); eputs (itoa (pfoo)); eputs ("\n");
+  eputs ("pfoo=");
+  eputs (itoa (pfoo));
+  eputs ("\n");
   if (pfoo != foo_size)
     return 15;
 
   pfoo--;
-  eputs ("pfoo="); eputs (itoa (pfoo)); eputs ("\n");
+  eputs ("pfoo=");
+  eputs (itoa (pfoo));
+  eputs ("\n");
   if (pfoo)
     return 16;
 
   pfoo++;
-  eputs ("pfoo="); eputs (itoa (pfoo)); eputs ("\n");
+  eputs ("pfoo=");
+  eputs (itoa (pfoo));
+  eputs ("\n");
   if (pfoo != foo_size)
     return 17;
 
   long one = 1;
   long two = 2;
   pfoo = pfoo - one;
-  eputs ("pfoo="); eputs (itoa (pfoo)); eputs ("\n");
+  eputs ("pfoo=");
+  eputs (itoa (pfoo));
+  eputs ("\n");
   if (pfoo)
     return 18;
 
   pfoo = pfoo + one;
-  eputs ("pfoo="); eputs (itoa (pfoo)); eputs ("\n");
+  eputs ("pfoo=");
+  eputs (itoa (pfoo));
+  eputs ("\n");
   if (pfoo != foo_size)
     return 19;
 
   pfoo -= one;
-  eputs ("pfoo="); eputs (itoa (pfoo)); eputs ("\n");
+  eputs ("pfoo=");
+  eputs (itoa (pfoo));
+  eputs ("\n");
   if (pfoo)
     return 20;
 
   pfoo += one;
-  eputs ("pfoo="); eputs (itoa (pfoo)); eputs ("\n");
+  eputs ("pfoo=");
+  eputs (itoa (pfoo));
+  eputs ("\n");
   if (pfoo != foo_size)
     return 21;
 
-  eputs ("&one: "); eputs (itoa (&one)); eputs ("\n");
-  eputs ("&two: "); eputs (itoa (&two)); eputs ("\n");
+  eputs ("&one: ");
+  eputs (itoa (&one));
+  eputs ("\n");
+  eputs ("&two: ");
+  eputs (itoa (&two));
+  eputs ("\n");
 
   if (&one - 1 != &two)
     return 22;
 
-  struct foosym = foo_size + foo_size;
+  struct foo *sym = foo_size + foo_size;
   int i = sym + 16;
-  eputs ("i="); eputs (itoa (i)); eputs ("\n");
+  eputs ("i=");
+  eputs (itoa (i));
+  eputs ("\n");
   if (i != foo_size_18)
     return 23;
 
   int d = 16;
   i = sym + d;
-  eputs ("i="); eputs (itoa (i)); eputs ("\n");
+  eputs ("i=");
+  eputs (itoa (i));
+  eputs ("\n");
   if (i != foo_size_18)
     return 24;
 
   i = sym - 16;
-  eputs ("i="); eputs (itoa (i)); eputs ("\n");
+  eputs ("i=");
+  eputs (itoa (i));
+  eputs ("\n");
   if (i != -foo_size_14)
     return 25;
 
   i = sym - d;
-  eputs ("i="); eputs (itoa (i)); eputs ("\n");
+  eputs ("i=");
+  eputs (itoa (i));
+  eputs ("\n");
   if (i != -foo_size_14)
     return 26;
 
-  i = sym - (struct foo*)foo_size;
-  eputs ("i="); eputs (itoa (i)); eputs ("\n");
+  i = sym - (struct foo *) foo_size;
+  eputs ("i=");
+  eputs (itoa (i));
+  eputs ("\n");
   if (i != 1)
     return 27;
 
   pfoo = sym + 1;
   pfoo -= sym;
-  eputs ("pfoo="); eputs (itoa (pfoo)); eputs ("\n");
+  eputs ("pfoo=");
+  eputs (itoa (pfoo));
+  eputs ("\n");
   if (pfoo != 1)
     return 28;
 
index ad9a6008180cbe4c084ebf8b8ef195f44632998e..6be1e60fc907e10d54c39a131855f328937a295e 100644 (file)
 
 #include <mes/lib.h>
 
-struct baz {
+struct baz
+{
   int i;
   int j;
 };
 
-struct foo {
+struct foo
+{
   int **bar;
 };
 
 void
 add0 (void *ptab)
 {
-  void **pp = *(void***)ptab;
- bla:
+  void **pp = *(void ***) ptab;
+bla:
   pp[0] = 0x11223344;
 }
 
 void
 add1 (void *ptab)
 {
-  void ***x = (void***)ptab;
- bla:
-  *(void***)ptab = 0x22334455;
+  void ***x = (void ***) ptab;
+bla:
+  *(void ***) ptab = 0x22334455;
 }
 
 void
 add2 (void *ptab)
 {
-  void ***x = (void***)ptab;
- bla:
+  void ***x = (void ***) ptab;
+bla:
   *x = 0x33445566;
 }
 
@@ -64,19 +66,30 @@ main ()
   int *p = &i;
   struct foo f;
   f.bar = &p;
-  eputs ("f.bar:"); eputs (itoa (f.bar)); eputs ("\n");
+  eputs ("f.bar:");
+  eputs (itoa (f.bar));
+  eputs ("\n");
 
   add0 (&f.bar);
-  eputs ("f.bar:"); eputs (itoa (*f.bar)); eputs ("\n");
-  if (*f.bar != 0x11223344) return 1;
+  eputs ("f.bar:");
+  eputs (itoa (*f.bar));
+  eputs ("\n");
+  if (*f.bar != 0x11223344)
+    return 1;
 
   add1 (&f.bar);
-  eputs ("f.bar:"); eputs (itoa (f.bar)); eputs ("\n");
-  if (f.bar != 0x22334455) return 2;
+  eputs ("f.bar:");
+  eputs (itoa (f.bar));
+  eputs ("\n");
+  if (f.bar != 0x22334455)
+    return 2;
 
   add2 (&f.bar);
-  eputs ("f.bar:"); eputs (itoa (f.bar)); eputs ("\n");
-  if (f.bar != 0x33445566) return 3;
+  eputs ("f.bar:");
+  eputs (itoa (f.bar));
+  eputs ("\n");
+  if (f.bar != 0x33445566)
+    return 3;
 
   hash_ident[0] = 10;
   *hash_ident = 0;
@@ -84,11 +97,13 @@ main ()
 
   struct baz b;
   b.i = b.j = 1;
-  if (b.i != 1) return 4;
+  if (b.i != 1)
+    return 4;
 
   struct baz *pb = &b;
   pb->i = pb->j = 1;
-  if (pb->i != 1) return 5;
+  if (pb->i != 1)
+    return 5;
 
   return 0;
 }
index cd623b21fcf7230bfdd30b2aa3038eb05a4a3b90..cb9cfb6751b8bb2e39ab5ab702449fede85e927a 100644 (file)
 
 #include <stdint.h>
 
-struct foo {
-    int i;
-    void *p;
+struct foo
+{
+  int i;
+  void *p;
 };
 
-union bar {
+union bar
+{
   struct foo foo;
 };
 
@@ -40,7 +42,8 @@ main ()
   bar.foo.p = "hallo";
 
   union bar *pb = &bar;
-  if (pb->foo.i != 2) return 1;
+  if (pb->foo.i != 2)
+    return 1;
 
   return 0;
 }
index a0579283d8176359f3179045c863ec74d458b9cd..4e90010c0be19900d248c42766d3554ff98a4e80 100644 (file)
 
 #include <mes/lib.h>
 
-int bla[2] = {0,-1};
+int bla[2] = { 0, -1 };
 
 int
 main ()
 {
   int *b = &bla;
 
-  int c[2] = {201, 211};
+  int c[2] = { 201, 211 };
   b[0] = 3;
 
   return 0;
index bb696092f705a39cf7dff4d3a930b03dec88c3e5..9684a0b8d67778a5d1c6ff8a18ff5e7d6b9a04e7 100644 (file)
@@ -30,8 +30,8 @@ struct foo
 
 struct foo f;
 
-int bla[6] = {0,0,11223344, 55667788,0,0};
-int g_c[2] = {101, 111};
+int bla[6] = { 0, 0, 11223344, 55667788, 0, 0 };
+int g_c[2] = { 101, 111 };
 
 int
 main ()
@@ -48,29 +48,45 @@ main ()
   if (b[3] != 55667788)
     return 4;
 
-  eputs ("g_c[0]="); eputs (itoa (g_c[0])); eputs ("\n");
-  eputs ("g_c[1]="); eputs (itoa (g_c[1])); eputs ("\n");
+  eputs ("g_c[0]=");
+  eputs (itoa (g_c[0]));
+  eputs ("\n");
+  eputs ("g_c[1]=");
+  eputs (itoa (g_c[1]));
+  eputs ("\n");
 
   memcpy (&b[2], g_c, 2 * sizeof (int));
-  eputs ("b[2]:"); eputs (itoa (b[2])); eputs ("\n");
+  eputs ("b[2]:");
+  eputs (itoa (b[2]));
+  eputs ("\n");
 
   if (b[2] != 101)
     return 5;
-  eputs ("b[3]:"); eputs (itoa (b[3])); eputs ("\n");
+  eputs ("b[3]:");
+  eputs (itoa (b[3]));
+  eputs ("\n");
   if (b[3] != 111)
     return 6;
 
-  int c[2] = {201, 211};
-  eputs ("c[0]="); eputs (itoa (c[0])); eputs ("\n");
-  eputs ("c[1]="); eputs (itoa (c[1])); eputs ("\n");
+  int c[2] = { 201, 211 };
+  eputs ("c[0]=");
+  eputs (itoa (c[0]));
+  eputs ("\n");
+  eputs ("c[1]=");
+  eputs (itoa (c[1]));
+  eputs ("\n");
 
   memcpy (&b[4], c, 2 * sizeof (int));
 
-  eputs ("b[4]:"); eputs (itoa (b[4])); eputs ("\n");
+  eputs ("b[4]:");
+  eputs (itoa (b[4]));
+  eputs ("\n");
 
   if (b[4] != 201)
     return 7;
-  eputs ("b[5]:"); eputs (itoa (b[5])); eputs ("\n");
+  eputs ("b[5]:");
+  eputs (itoa (b[5]));
+  eputs ("\n");
   if (b[5] != 211)
     return 8;
 
index 6bea556f9f2294205ab8d2c57530afa3b713b529..0c4b096a84b2ffa68af787f5b779ba4c39ba7a29 100644 (file)
 #include <stdio.h>
 #include <string.h>
 
-struct file {
+struct file
+{
   char buffer[1];
 };
 
-struct xfile {
+struct xfile
+{
   char *buffer;
 };
 
@@ -152,8 +154,10 @@ main ()
   eputs (file.buffer);
   memcpy (ps + 1, "  ", 2);
   eputs (file.buffer);
-  eputs (itoa (ps[1])); eputs ("\n");
-  eputs (itoa (((' ' << 8) + ' '))); eputs ("\n");
+  eputs (itoa (ps[1]));
+  eputs ("\n");
+  eputs (itoa (((' ' << 8) + ' ')));
+  eputs ("\n");
   if (ps[1] != ((' ' << 8) + ' '))
     return 40;
   if (p[4] != '4')
@@ -163,8 +167,10 @@ main ()
   eputs (file.buffer);
   ps[2] = ((' ' << 8) + ' ');
   eputs (file.buffer);
-  eputs (itoa (ps[2])); eputs ("\n");
-  eputs (itoa (((' ' << 8) + ' '))); eputs ("\n");
+  eputs (itoa (ps[2]));
+  eputs ("\n");
+  eputs (itoa (((' ' << 8) + ' ')));
+  eputs ("\n");
   if (ps[2] != ((' ' << 8) + ' '))
     return 42;
   if (p[6] != '6')
index 9ea1d444b21c6be874e7df4f6f6c5c18600ae83d..6856a93900e8947401c973918bfefede0b006dd7 100644 (file)
@@ -26,7 +26,7 @@ struct foo
   int b;
 };
 
-struct foo g_foo[2] = {0,1,2,3};
+struct foo g_foo[2] = { 0, 1, 2, 3 };
 
 
 int
index 0b7707114ae35140908f4723ed49d1f3ce609325..a5b4144c38f173bc1efe98e70f78ccefddf33800 100644 (file)
@@ -25,7 +25,7 @@ struct bar
   int bar[4];
 };
 
-struct bar g_bar = {101,102};
+struct bar g_bar = { 101, 102 };
 
 int
 main ()
index bf8b66edee51ae559a5543075d1d5d3b52a63763..d1cf93d949d8bbdd1d0d87e6e3b28f043347c313 100644 (file)
@@ -26,14 +26,15 @@ struct foo
   int b;
 };
 
-struct foo g_foo[2] = {0,1,2,3};
+struct foo g_foo[2] = { 0, 1, 2, 3 };
 
 struct bar
 {
   int bar[4];
 };
 
-struct bar g_bar = {101,102};
+struct bar g_bar = { 101, 102 };
+
 typedef struct bar bar_struct;
 typedef struct bar foo_struct;
 
@@ -50,7 +51,7 @@ main ()
     return 4;
 
   void *p = &g_foo;
-  struct foo* pfoo = (((struct foo *)p) + 1);
+  struct foo *pfoo = (((struct foo *) p) + 1);
   if (pfoo->a != 2)
     return 5;
   if (pfoo->b != 3)
@@ -64,7 +65,7 @@ main ()
   if (*pi != 101)
     return 8;
 
-  struct bar bar = {0x22, 0x33};
+  struct bar bar = { 0x22, 0x33 };
   pi = &bar;
   if (*pi != 0x22)
     return 9;