ThibautVerron

- command-execute                                                1083  90%
 - call-interactively                                            1077  90%
  - funcall-interactively                                         900  75%
   - execute-extended-command                                     584  48%
    - execute-extended-command--shorter                           568  47%
     - completion-try-completion                                  564  47%
      - completion--nth-completion                                564  47%
       - completion--some                                         564  47%
        - #<compiled 0x11ec78d>                                   564  47%
         - completion-pcm-try-completion                          416  34%

ThibautVerron

============ start debug info ============
libhd version 21.12u (ia32) [6464]
using /var/lib/hardware
kernel version is 3.19
----- /proc/cmdline -----
  BOOT_IMAGE=/boot/vmlinuz-3.19.4-1-desktop root=UUID=421dd41e-1309-449c-91f7-b9fa3b0832d5 acpi_osi= acpi_backlight=vendor resume=/dev/disk/by-id/ata-ST9250315AS_6VCPC32W-part6 splash=silent quiet showopts
----- /proc/cmdline end -----
debug = 0xff7ffff7
probe = 0x15938fcdaa17fcf9fffe (+memory +pci +isapnp +net +floppy +misc +misc.serial +misc.par +misc.floppy +serial +cpu +bios +monitor +mouse +scsi +usb -usb.mods +modem +modem.usb +parallel +parallel.lp +parallel.zip -isa -isa.isdn +isdn +kbd +prom +sbus +int +braille +braille.alva +braille.fhp +braille.ht -ignx11 +sys -bios.vbe -isapnp.old -isapnp.new -isapnp.mod +braille.baum -manual +fb +pppoe -scan +pcmcia +fork -parallel.imm +s390 +cpuemu -sysfs -s390disks +udev +block +block.cdrom +block.part +edd +edd.mod -bios.ddc -bios.fb -bios.mode +input +block.mods +bios.vesa -cpuemu.debug -scsi.noserial +wlan -bi

ThibautVerron

% for ((i=0;i<10;i++)); do printf "i=%s var=%s res=%s\n" $i $var ${var:${#var}-$i}; done
i=0 var=12345 res=
i=1 var=12345 res=5
i=2 var=12345 res=45
i=3 var=12345 res=345
i=4 var=12345 res=2345
i=5 var=12345 res=12345
i=6 var=12345 res=5
i=7 var=12345 res=45
i=8 var=12345 res=345

ThibautVerron

(defun insert-sort (list element)
  "Contestant 1: Insert element into list, then sort"
  (sort (cons element list) #'<)
  )

(defun insert-linear (list element)
  "Contestant 2: Scan sorted list linearly and insert element in order"
  (cond
   ((null list) (cons element list))
   ((<= element (car list)) (cons element list))