File: 1.ss

package info (click to toggle)
drscheme 1%3A352-6
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 71,608 kB
  • ctags: 55,284
  • sloc: ansic: 278,966; cpp: 63,318; sh: 32,265; lisp: 14,530; asm: 7,327; makefile: 4,846; pascal: 4,363; perl: 2,920; java: 1,632; yacc: 755; lex: 258; sed: 93; xml: 12
file content (17 lines) | stat: -rw-r--r-- 427 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
;; module loader for SRFI-1
(module |1| mzscheme
  
  (require (lib "list.ss" "srfi" "1"))
  
  (provide (all-from-except (lib "list.ss" "srfi" "1")
		       s:append! s:reverse!
		       s:map s:for-each
		       s:member
		       s:assoc)
	   (rename s:append! append!)
	   (rename s:reverse! reverse!)
	   (rename s:map map)
	   (rename s:for-each for-each)
	   (rename s:member member)
	   (rename s:assoc assoc)))