Update of /cvsroot/wisp/wisp/tools
In directory usw-pr-cvs1:/tmp/cvs-serv30082/tools
Modified Files:
debsnap was worth
Log Message:
Dropped the |gimme| special form and created the builtin module mechanism.
Index: debsnap
===================================================================
RCS file: /cvsroot/wisp/wisp/tools/debsnap,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -d -r1.6 -r1.7
--- debsnap 26 Aug 2002 16:15:02 -0000 1.6
+++ debsnap 4 Sep 2002 14:30:56 -0000 1.7
@@ -8,9 +8,8 @@
;;
;;;; @(#) $Id$
-(gimme syscalls)
-
-(use files lists regex strings unix)
+(use
+ files lists regex strings syscalls unix)
(call-process "make distdir" 'signal-failure)
Index: was
===================================================================
RCS file: /cvsroot/wisp/wisp/tools/was,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -d -r1.8 -r1.9
--- was 26 Aug 2002 16:18:24 -0000 1.8
+++ was 4 Sep 2002 14:30:56 -0000 1.9
@@ -9,9 +9,7 @@
;;;; @(#) $Id$
(use
- cpu/ia32 format/elfexec getopt)
-
-(gimme syscalls)
+ cpu/ia32 format/elfexec getopt syscalls)
(my (input output) (getopt '((option ("output" #\o) value output)
(arg input mandatory)
Index: worth
===================================================================
RCS file: /cvsroot/wisp/wisp/tools/worth,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -d -r1.23 -r1.24
--- worth 4 Sep 2002 14:26:58 -0000 1.23
+++ worth 4 Sep 2002 14:30:56 -0000 1.24
@@ -11,9 +11,8 @@
(define worth-version "0.0.1")
(use
- cpu/general cpu/ia32 format/as format/elfexec getopt lists unix)
-
-(gimme syscalls)
+ cpu/general cpu/ia32 format/as format/elfexec getopt lists syscalls
+ unix)
(define builtin-words
'(< <= <> = > >= begin else if then u< u<= u> u>= until))
|
