-
1181463·lisp·844 B·2008-08-22 09:56 UTC
> (let ((l (list 1 2 3)))
(rplacd (last l) l)
(loop
for n in l
for i from 0 to 100
collect (list n i)))
((1 0) (2 1) (3 2) (1 3) (2 4) (3 5) (1 6) (2 7) (3 8) (1 9) (2 10) (3 11)
-
1181456·text·1.2 KB·2008-08-22 09:42 UTC
<?
$url = "http://rule-12.com/style_images/ip.boardpr/logo4.gif";
$x = $_GET['x'];
$max = 1000;
$size = getSizeFile($url);
function getSizeFile($url) {
if (substr($url,0,4)=='http')
-
1181388·lisp·8.5 KB·2008-08-22 06:55 UTC
;; A Common Lisp arcfour implementation
;; Put into the Public Domain.
;; TODO:
;; - Write with-key-init or such macro
;; - Write stream-type functions for it
(declaim (optimize (speed 3) (
-
1181361·text·28.2 KB·2008-08-22 05:53 UTC
!!################################
!!ALSA Information Script v 0.4.41
!!################################
!!Script ran on: Thu Aug 21 22:53:28 PDT 2008
!!Linux Distribution
!!------------------
Fe
-
1181232·text·176.6 KB·2008-08-22 01:48 UTC
-
1181169·text·15.0 KB·2008-08-22 00:09 UTC
!!################################
!!ALSA Information Script v 0.4.41
!!################################
!!Script ran on: Fri Aug 22 01:07:50 BST 2008
!!Linux Distribution
!!------------------
Fe
-
1181121·text·1.1 KB·2008-08-21 23:04 UTC
/*
* File: soft_atimes.c
* Author: D.J. Capelis
*
* Compile:
* gcc -fPIC -c -o soft_atimes.o soft_atimes.c
* gcc -shared -o soft_atimes.so soft_atimes.o -ldl
*
* Use:
* LD_PRELOAD=".
-
1181118·mirc·173 B·2008-08-21 23:03 UTC
on *:text:*[ PRE ]*:#SOURCECHAN: {
set %clean $strip($1-,burc)
set %release_ $7
set %release_ $mid(%clean,7,999)
if ($nick == BOT) {
msg #chan !addpre %release $5
}
}
-
1181109·text·7.3 KB·2008-08-21 22:34 UTC
#
# old_revision [9f68e99b72ccd68939ca1cab014d1e79dd390bc4]
#
# delete "packages/kexecboot/files/rootdelay.patch"
#
# add_file "packages/kexecboot/files/rootwait-cmdline.patch"
# content [76e9
-
1181107·text·5.5 KB·2008-08-21 22:29 UTC
#
# old_revision [9f68e99b72ccd68939ca1cab014d1e79dd390bc4]
#
# delete "packages/kexecboot/files/rootdelay.patch"
#
# patch "packages/kexecboot/initramfs-kexecboot_1.0.bb"
# from [d3cfea5e56d9
-
1181104·text·20.9 KB·2008-08-21 22:28 UTC
!!################################
!!ALSA Information Script v 0.4.41
!!################################
!!Script ran on: Thu Aug 21 18:28:18 EDT 2008
!!Linux Distribution
!!------------------
Fe
-
1181084·python·4.4 KB·2008-08-21 21:49 UTC
#!/usr/bin/env python
# -*- coding: iso-8859-1 -*-
'''
Esta função para retirada dos caracteres de cor se baseia em um autômato construído
para este propósito, utilizando-se dos conceitos da
-
1181060·text·1.5 KB·2008-08-21 21:14 UTC
Class: Cleric (God: Belisarda)
Race: Elorii (Ardakene Elorii, "life Elorii")
Languages: Eloran, Low Coryani, High Coryani, Sssethric, Altharian (Ancient Imperial), Celestial.
Alignment: Lawful Good
-
1181032·text·55.0 KB·2008-08-21 20:55 UTC
-
1180971·text·1.1 KB·2008-08-21 19:39 UTC
CTCP 1:ping: {
if ($window(@CTCP) == $null) window -an @CTCP
echo @CTCP 8 $timestamp ***INFO*** 10You were just 4pinged 10by $nick 8 $address
echo @CTCP -
halt
}
CTCP 1:FINGER: {
i
-
1180963·text·2.3 KB·2008-08-21 19:32 UTC
<gconfentryfile>
<entrylist base="/system/storage">
<entry>
<key>default_options/iso9660/mount_options</key>
<schema_key>/schemas/system/storage/default_options/iso9660/mount_opt
-
1180949·text·1.8 KB·2008-08-21 19:07 UTC
/home/navier01d/loginov/gentoo/i686/bin
/home/navier01d/loginov/gentoo/i686/bin/bash
/home/navier01d/loginov/gentoo/i686/bin/rbash
/home/navier01d/loginov/gentoo/i686/etc
/home/navier01d/loginov/g
-
1180940·php·768 B·2008-08-21 18:53 UTC
<?php
$ar = array('color', 'colour', 'colours',
'program', 'programme', 'programming',
'shoppe', 'shopping', 'shops',
'ticket', 'tickets');
if (PHP_SAPI != '
-
1180939·text·70 B·2008-08-21 18:53 UTC
20:52:54 up 3 days, 4:08, 0 users, load average: 0.00, 0.00, 0.00
-
1180936·text·92 B·2008-08-21 18:49 UTC
<gconfentryfile>
<entrylist base="/storage/storage">
</entrylist>
</gconfentryfile>