iratqq

#title "L'homme_armé"
;; http://en.wikipedia.org/wiki/L'homme_arm%C3%A9

AC @74 o5 BT3,4 t130

AC g2g >c2c <b-a2 g2. >dd<g r>dd dc2 <b-a2

AC g2. >ddd <g2. >g2g f2f g2g d2. g2g f2f

AC g2g d2 g a2g fe2 d2. r2. <g2g >c2c

iratqq

#title "Douce Dame Jolie"
;; http://en.wikipedia.org/wiki/Douce_Dame_Jolie

AC @74 o5

AC d d<gfg b-8ag8aa g>dd8c<b-8 b-8ag8a >d

AC <ggfg b-8ag8a>c <b-.a8gf+g2. >

AC eggfe 

iratqq

# $ awk -f bin-discid.awk foobar.cue


BEGIN {
	trackno = 0;
	framesize = 75;
	bsize = 2352;
	msf_offset = 150;
}

iratqq

diff -aruN pty-4.0.orig/config/ttyopts.h pty-4.0/config/ttyopts.h
--- pty-4.0.orig/config/ttyopts.h	Mon Mar  2 11:49:03 1992
+++ pty-4.0/config/ttyopts.h	Tue Feb 15 16:17:30 2011
@@ -4,6 +4,7 @@
 #define TTY_WINDOWS
 #undef TTY_AUXCHARS
 #undef TTY_TERMIO
+#define USE_OLD_TTY
 
 /* TTY_WINDOWS must be on line 4. */

iratqq

(require-extension (srfi 1))
(require "http-client.scm")
(require "util.scm")

(require-dynlib "expat")

(define google-suggest-charset-alist
  '((ja . "Shift-JIS")))

(define (parse-google-suggest xml-str)

iratqq

/*
 * Copyright (c) 2011 Iwata <[email protected]>
 *
 * Permission to use, copy, modify, and distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice and this permission notice appear in all copies.
 *
 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR

iratqq

--- main.c.orig	Tue Jan 18 13:33:17 2011
+++ main.c	Tue Jan 18 13:51:22 2011
@@ -19,6 +19,7 @@
 #include <sys/select.h>
 #include <sys/time.h>
 #include <sys/types.h>
+#include <sys/param.h>
 
 Dzen dzen = {0};
 static int last_cnt = 0;

iratqq

;; skkserv
(require-extension (srfi 1 48))

(require "util.scm")
(require "socket.scm")
(require "i18n.scm")
(require "input-parse.scm")
(require-dynlib "look")

(define socks (tcp-listen "localhost" 1178))

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_;