iratqq

Index: sys/dev/usb/if_rsu.c
===================================================================
RCS file: /cvs/src/sys/dev/usb/if_rsu.c,v
retrieving revision 1.1
diff -u -p -u -r1.1 if_rsu.c
--- sys/dev/usb/if_rsu.c	11 Dec 2010 20:48:21 -0000	1.1
+++ sys/dev/usb/if_rsu.c	12 Dec 2010 05:16:55 -0000
@@ -105,6 +105,7 @@ static const struct usb_devno rsu_devs[]
 	{ USB_VENDOR_GUILLEMOT,		USB_PRODUCT_GUILLEMOT_RTL8192SU },
 	{ USB_VENDOR_HAWKING,		USB_PRODUCT_HAWKING_RTL8192SU_1 },

iratqq

#include <stdio.h>
#include <string.h>
#include <ecl/ecl.h>

size_t
sexp_to_str(char *dest, size_t len, char *fmt, const char *exp)
{
	cl_object exp_ = c_string_to_object(exp);
	cl_object fmt_;

iratqq

#include <stdio.h>
#include <string.h>
#include <ecl/ecl.h>
#include <stdarg.h>

cl_object LISP(bool x) { return x ? Ct : Cnil; }
cl_object LISP(int x) { return ecl_make_integer(x); }
cl_object LISP(unsigned int x) { return ecl_make_unsigned_integer(x); }
cl_object LISP(float x) { return ecl_make_singlefloat(x); }
cl_object LISP(double x) { return ecl_make_doublefloat(x); }

iratqq

# diff -u librthread/arch/i386/_atomic_lock.c.orig librthread/arch/i386/_atomic_lock.c                                     
--- librthread/arch/i386/_atomic_lock.c.orig    Fri Oct 29 19:24:23 2010
+++ librthread/arch/i386/_atomic_lock.c Fri Oct 29 19:24:16 2010
@@ -19,7 +19,7 @@
        old = _SPINLOCK_LOCKED;
        __asm__("xchg %0,%1"
                : "=r" (old), "=m" (*lock)
-               : "0"  (old), "1"  (*lock));
+               : "r"  (old), "m"  (*lock));
 

iratqq

c buffer overflow on pcc/f77
      write (*, *) "hello,world"
c      end
c
c Warning on line 1 of 烝烝烝烝烝烝烝烝: missing END statement
c Error on line 1 of 烝烝烝烝烝烝烝烝: DO loop or BLOCK IF not closed

iratqq

#include <stdio.h>
#include <math.h>
#include <chipmunk/chipmunk.h>
#include <caca.h>

#define WORLD_X 80.0f
#define WORLD_Y 42.0f

static cpSpace *space;

iratqq

#include <stdio.h>
#include <math.h>
#include <chipmunk/chipmunk.h>
#include <caca.h>

#define WORLD_X 80.0f
#define WORLD_Y 32.0f

static cpSpace *space;

iratqq

MODULE Hello;
  IMPORT Out;
BEGIN
  Out.String("hello,world");
END Hello.

iratqq

$ abcl
Armed Bear Common Lisp 0.21.0
Java 1.7.0-internal Sun Microsystems Inc.
OpenJDK Client VM
Low-level initialization completed in 0.908 seconds.
Startup completed in 2.729 seconds.
Type ":help" for a list of available commands.
CL-USER(1): (setq *DISASSEMBLER* "jrevpro -dc")
"jrevpro -dc"
CL-USER(2): (defun fact (x) (if (<= x 2) 1 (* x (fact (- x 1)))))

iratqq

/* cc -Wall -Werror x.c */
#include <stdlib.h>

int foo(int i, ...) __attribute__((__sentinel__));

int
foo(int i, ...)
{
	return i;
}