Author: grant

How to get your UID with PLT Scheme under UNIX

Via Eli on comp.lang.scheme:

#lang scheme
;; using the /proc filesystem
(call-with-input-file "/proc/self/loginuid" read)
;; running `id'
(require scheme/system)
(let ([o (open-output-string)])
  (parameterize ([current-output-port o]) (system "id -u"))
  (read (open-input-string (get-output-string o))))
;; calling getuid()
(require scheme/foreign)
(unsafe!)
((get-ffi-obj 'getuid #f (_fun -> _int)))

Adding Unicode Fonts to Windows

Today I set up pretty-mode.el and found that the laptop had all of the Unicode fonts but the desktop did not. I ended up installing Arial Unicode MS as suggested by unicode.org, and that installed all of the missing fonts.

If you have Microsoft Office 2000 and newer versions, you can get the Arial Unicode MS font, which is the most complete. To get it, insert the Office CD, and do a custom install. Choose Add or Remove Features. Click the (+) next to Office Tools, then International Support, then the Universal Font icon, and choose the installation option you want.