January 2004 - movitz-cvs@common-lisp.net

[movitz-cvs] CVS update: Module imported: binary-types
by Frode Vatvedt Fjeld 13 Jan '04

13 Jan '04

Update of /project/movitz/cvsroot/binary-types In directory common-lisp.net:/home/ffjeld/binary-types Log Message: Imported to common-lisp.net Status: Vendor Tag: frodef Release Tags: start N binary-types/binary-types.lisp N binary-types/Makefile N binary-types/example.lisp N binary-types/COPYING N binary-types/ChangeLog N binary-types/README N binary-types/README-bitfield N binary-types/type-hierarchy.ps N binary-types/type-hierarchy.pdf No conflicts created by this import Date: Tue Jan 13 06:13:13 2004 Author: ffjeld New module binary-types added

1 0

[movitz-cvs] CVS update: Module imported: movitz
by Frode Vatvedt Fjeld 13 Jan '04

13 Jan '04

Update of /project/movitz/cvsroot/movitz In directory common-lisp.net:/home/ffjeld/movitz Log Message: Imported to common-lisp.net Status: Vendor Tag: frodef Release Tags: start I movitz/CVS N movitz/COPYING N movitz/assembly-syntax.lisp N movitz/bochsrc.txt N movitz/bootblock.lisp N movitz/browser.lisp N movitz/compiler-protocol.lisp N movitz/compiler-types.lisp N movitz/compiler.lisp N movitz/environment.lisp N movitz/eval.lisp N movitz/image.lisp N movitz/load.lisp N movitz/movitz-mode.el N movitz/movitz.lisp N movitz/multiboot.lisp N movitz/packages.lisp N movitz/parse.lisp N movitz/procfs-image.lisp N movitz/special-operators-cl.lisp N movitz/special-operators.lisp N movitz/storage-types.lisp N movitz/stream-image.lisp N movitz/udp6-send.py N movitz/los0-image N movitz/bootblock-id.txt I movitz/doc/CVS N movitz/doc/ChangeLog N movitz/doc/ideas.txt N movitz/doc/movitz.html I movitz/doc/report/CVS N movitz/doc/report/browser.eps N movitz/doc/report/browser.fig N movitz/doc/report/browser.pdf N movitz/doc/report/computer1.jpg N movitz/doc/report/computer2.gif N movitz/doc/report/computer2.png N movitz/doc/report/intro.fig N movitz/doc/report/movitz.tex N movitz/doc/report/screenshot.eps N movitz/doc/report/screenshot.fig N movitz/doc/report/screenshot.pdf I movitz/grub-bootloader/CVS N movitz/grub-bootloader/README N movitz/grub-bootloader/grub-bootloader.img N movitz/grub-bootloader/menu.txt I movitz/losp/CVS N movitz/losp/common-lisp.lisp N movitz/losp/los0.lisp I movitz/losp/lib/CVS N movitz/losp/lib/bcd.lisp N movitz/losp/lib/console.lisp N movitz/losp/lib/malloc-init.lisp N movitz/losp/lib/misc.lisp N movitz/losp/lib/named-integers.lisp N movitz/losp/lib/package.lisp N movitz/losp/lib/readline.lisp N movitz/losp/lib/repl.lisp N movitz/losp/lib/toplevel.lisp I movitz/losp/lib/net/CVS N movitz/losp/lib/net/arp.lisp N movitz/losp/lib/net/ethernet.lisp N movitz/losp/lib/net/ip4.lisp N movitz/losp/lib/net/ip6.lisp I movitz/losp/muerte/CVS N movitz/losp/muerte/arrays.lisp N movitz/losp/muerte/basic-functions.lisp N movitz/losp/muerte/basic-macros.lisp N movitz/losp/muerte/characters.lisp N movitz/losp/muerte/common-lisp.lisp N movitz/losp/muerte/conditions.lisp N movitz/losp/muerte/cons.lisp N movitz/losp/muerte/cpu-id.lisp N movitz/losp/muerte/defstruct.lisp N movitz/losp/muerte/environment.lisp N movitz/losp/muerte/equalp.lisp N movitz/losp/muerte/error.lisp N movitz/losp/muerte/eval.lisp N movitz/losp/muerte/format.lisp N movitz/losp/muerte/functions.lisp N movitz/losp/muerte/hash-tables.lisp N movitz/losp/muerte/inspect.lisp N movitz/losp/muerte/integers.lisp N movitz/losp/muerte/io-port.lisp N movitz/losp/muerte/lists.lisp N movitz/losp/muerte/loop.lisp N movitz/losp/muerte/los-closette-compiler.lisp N movitz/losp/muerte/los-closette.lisp N movitz/losp/muerte/memref.lisp N movitz/losp/muerte/more-macros.lisp N movitz/losp/muerte/packages.lisp N movitz/losp/muerte/primitive-functions.lisp N movitz/losp/muerte/print.lisp N movitz/losp/muerte/read.lisp N movitz/losp/muerte/restarts.lisp N movitz/losp/muerte/run-time-context.lisp N movitz/losp/muerte/segments.lisp N movitz/losp/muerte/sequences.lisp N movitz/losp/muerte/setf.lisp N movitz/losp/muerte/simple-streams.lisp N movitz/losp/muerte/streams.lisp N movitz/losp/muerte/strings.lisp N movitz/losp/muerte/symbols.lisp N movitz/losp/muerte/typep.lisp N movitz/losp/muerte/variables.lisp I movitz/losp/x86-pc/CVS N movitz/losp/x86-pc/all.lisp N movitz/losp/x86-pc/cmos.lisp N movitz/losp/x86-pc/debugger.lisp N movitz/losp/x86-pc/dp8390.lisp N movitz/losp/x86-pc/interrupt.lisp N movitz/losp/x86-pc/io-space.lisp N movitz/losp/x86-pc/keyboard.lisp N movitz/losp/x86-pc/memory.lisp N movitz/losp/x86-pc/ne2k.lisp N movitz/losp/x86-pc/package.lisp N movitz/losp/x86-pc/pci.lisp N movitz/losp/x86-pc/pic8259.lisp N movitz/losp/x86-pc/pit8253.lisp N movitz/losp/x86-pc/serial.lisp N movitz/losp/x86-pc/textmode-console.lisp N movitz/losp/x86-pc/textmode.lisp N movitz/losp/x86-pc/vga.lisp No conflicts created by this import Date: Tue Jan 13 06:05:07 2004 Author: ffjeld New module movitz added

1 0

[movitz-cvs] CVS update: ia-x86/packages.lisp
by Frode Vatvedt Fjeld 13 Jan '04

13 Jan '04

Update of /project/movitz/cvsroot/ia-x86 In directory common-lisp.net:/tmp/cvs-serv5121 Added Files: packages.lisp Log Message: more fixing up Date: Tue Jan 13 06:04:33 2004 Author: ffjeld

1 0

[movitz-cvs] CVS update: ia-x86/packages.lisp
by Frode Vatvedt Fjeld 13 Jan '04

13 Jan '04

Update of /project/movitz/cvsroot/ia-x86 In directory common-lisp.net:/tmp/cvs-serv20514 Added Files: packages.lisp Log Message: this is the one Date: Tue Jan 13 06:03:12 2004 Author: ffjeld Index: ia-x86/packages.lisp diff -u /dev/null ia-x86/packages.lisp:1.3 --- /dev/null Tue Jan 13 06:03:12 2004 +++ ia-x86/packages.lisp Tue Jan 13 06:03:12 2004 @@ -0,0 +1,99 @@ +;;;;------------------------------------------------------------------ +;;;; +;;;; Copyright (C) 20012000, 2002-2003, +;;;; Department of Computer Science, University of Tromsø, Norway +;;;; +;;;; Filename: packages.lisp +;;;; Description: Operand representation. +;;;; Author: Frode Vatvedt Fjeld <frodef(a)acm.org> +;;;; Created at: Wed Feb 16 14:02:57 2000 +;;;; Distribution: See the accompanying file COPYING. +;;;; +;;;; $Id: packages.lisp,v 1.3 2004/01/13 11:03:12 ffjeld Exp $ +;;;; +;;;;------------------------------------------------------------------ + +(in-package "CL-USER") + +(defpackage "IA-X86" + (:use "COMMON-LISP") + (:export + #:init-instruction-tables + #:*cpu-mode* + #:decode-sub-stream + #:decode-read-octet + #:decode + #:def-instr + #:def-set + ;; operands + #:r/m8 + #:r/m16 + #:r/m32 + #:r8 + #:r16 + #:r32 + #:+r8 + #:+r16 + #:+r32 + #:pointer + #:simm8 + #:imm8 + #:imm16 + #:imm32 + #:rel8 + #:rel16 + #:rel32 + #:ptr16-16 + #:ptr16-32 + #:al + #:ax + #:eax + #:cl + #:dx + #:sreg + #:cs + #:ds + #:es + #:fs + #:gs + #:ss + #:m32real + #:m64real + #:m80real + #:m16int + #:m32int + ;; instruction class + #:instruction + #:instruction-operands + #:instruction-prefixes + ;; instruction prefixes + #:lock + #:repne + #:repz + #:cs-override + #:ds-override + #:es-override + #:fs-override + #:gs-override + #:ss-override + #:16-bit-operand + #:16-bit-address + #:*symtab-lookup* + ;; proglist + #:proglist-encode + #:make-label + ;; read + #:read-instruction + #:read-proglist + #:asm + ;; symtab + #:symtab-lookup-label + #:symtab-try-lookup-label + )) + +(defpackage "IA-X86-INSTR" + (:use "IA-X86") + (:import-from "COMMON-LISP" t nil defclass load eval compile) + (:documentation + "All the specialized classes for IA-X86 instructions are put into +this package, so that we may have instructions named 'and' etc."))

1 0

[movitz-cvs] CVS update: ia-x86/packages.lisp
by Frode Vatvedt Fjeld 13 Jan '04

13 Jan '04

Update of /project/movitz/cvsroot/ia-x86 In directory common-lisp.net:/tmp/cvs-serv20096 Removed Files: packages.lisp Log Message: Fixing up previous erroneous import Date: Tue Jan 13 06:02:32 2004 Author: ffjeld

1 0

[movitz-cvs] CVS update: Module imported: ia-x86
by Frode Vatvedt Fjeld 13 Jan '04

13 Jan '04

Update of /project/movitz/cvsroot/ia-x86 In directory common-lisp.net:/home/ffjeld/movitz Log Message: Imported to common-lisp.net Status: Vendor Tag: frodef Release Tags: start I ia-x86/CVS C ia-x86/COPYING N ia-x86/assembly-syntax.lisp N ia-x86/bochsrc.txt N ia-x86/bootblock.lisp N ia-x86/browser.lisp N ia-x86/compiler-protocol.lisp N ia-x86/compiler-types.lisp N ia-x86/compiler.lisp N ia-x86/environment.lisp N ia-x86/eval.lisp N ia-x86/image.lisp N ia-x86/load.lisp N ia-x86/movitz-mode.el N ia-x86/movitz.lisp N ia-x86/multiboot.lisp U ia-x86/packages.lisp N ia-x86/parse.lisp N ia-x86/procfs-image.lisp N ia-x86/special-operators-cl.lisp N ia-x86/special-operators.lisp N ia-x86/storage-types.lisp N ia-x86/stream-image.lisp N ia-x86/udp6-send.py N ia-x86/los0-image N ia-x86/bootblock-id.txt I ia-x86/doc/CVS N ia-x86/doc/ChangeLog N ia-x86/doc/ideas.txt N ia-x86/doc/movitz.html I ia-x86/doc/report/CVS N ia-x86/doc/report/browser.eps N ia-x86/doc/report/browser.fig N ia-x86/doc/report/browser.pdf N ia-x86/doc/report/computer1.jpg N ia-x86/doc/report/computer2.gif N ia-x86/doc/report/computer2.png N ia-x86/doc/report/intro.fig N ia-x86/doc/report/movitz.tex N ia-x86/doc/report/screenshot.eps N ia-x86/doc/report/screenshot.fig N ia-x86/doc/report/screenshot.pdf I ia-x86/grub-bootloader/CVS N ia-x86/grub-bootloader/README N ia-x86/grub-bootloader/grub-bootloader.img N ia-x86/grub-bootloader/menu.txt I ia-x86/losp/CVS N ia-x86/losp/common-lisp.lisp N ia-x86/losp/los0.lisp I ia-x86/losp/lib/CVS N ia-x86/losp/lib/bcd.lisp N ia-x86/losp/lib/console.lisp N ia-x86/losp/lib/malloc-init.lisp N ia-x86/losp/lib/misc.lisp N ia-x86/losp/lib/named-integers.lisp N ia-x86/losp/lib/package.lisp N ia-x86/losp/lib/readline.lisp N ia-x86/losp/lib/repl.lisp N ia-x86/losp/lib/toplevel.lisp I ia-x86/losp/lib/net/CVS N ia-x86/losp/lib/net/arp.lisp N ia-x86/losp/lib/net/ethernet.lisp N ia-x86/losp/lib/net/ip4.lisp N ia-x86/losp/lib/net/ip6.lisp I ia-x86/losp/muerte/CVS N ia-x86/losp/muerte/arrays.lisp N ia-x86/losp/muerte/basic-functions.lisp N ia-x86/losp/muerte/basic-macros.lisp N ia-x86/losp/muerte/characters.lisp N ia-x86/losp/muerte/common-lisp.lisp N ia-x86/losp/muerte/conditions.lisp N ia-x86/losp/muerte/cons.lisp N ia-x86/losp/muerte/cpu-id.lisp N ia-x86/losp/muerte/defstruct.lisp N ia-x86/losp/muerte/environment.lisp N ia-x86/losp/muerte/equalp.lisp N ia-x86/losp/muerte/error.lisp N ia-x86/losp/muerte/eval.lisp N ia-x86/losp/muerte/format.lisp N ia-x86/losp/muerte/functions.lisp N ia-x86/losp/muerte/hash-tables.lisp N ia-x86/losp/muerte/inspect.lisp N ia-x86/losp/muerte/integers.lisp N ia-x86/losp/muerte/io-port.lisp N ia-x86/losp/muerte/lists.lisp N ia-x86/losp/muerte/loop.lisp N ia-x86/losp/muerte/los-closette-compiler.lisp N ia-x86/losp/muerte/los-closette.lisp N ia-x86/losp/muerte/memref.lisp N ia-x86/losp/muerte/more-macros.lisp N ia-x86/losp/muerte/packages.lisp N ia-x86/losp/muerte/primitive-functions.lisp N ia-x86/losp/muerte/print.lisp N ia-x86/losp/muerte/read.lisp N ia-x86/losp/muerte/restarts.lisp N ia-x86/losp/muerte/run-time-context.lisp N ia-x86/losp/muerte/segments.lisp N ia-x86/losp/muerte/sequences.lisp N ia-x86/losp/muerte/setf.lisp N ia-x86/losp/muerte/simple-streams.lisp N ia-x86/losp/muerte/streams.lisp N ia-x86/losp/muerte/strings.lisp N ia-x86/losp/muerte/symbols.lisp N ia-x86/losp/muerte/typep.lisp N ia-x86/losp/muerte/variables.lisp I ia-x86/losp/x86-pc/CVS N ia-x86/losp/x86-pc/all.lisp N ia-x86/losp/x86-pc/cmos.lisp N ia-x86/losp/x86-pc/debugger.lisp N ia-x86/losp/x86-pc/dp8390.lisp N ia-x86/losp/x86-pc/interrupt.lisp N ia-x86/losp/x86-pc/io-space.lisp N ia-x86/losp/x86-pc/keyboard.lisp N ia-x86/losp/x86-pc/memory.lisp N ia-x86/losp/x86-pc/ne2k.lisp N ia-x86/losp/x86-pc/package.lisp N ia-x86/losp/x86-pc/pci.lisp N ia-x86/losp/x86-pc/pic8259.lisp N ia-x86/losp/x86-pc/pit8253.lisp N ia-x86/losp/x86-pc/serial.lisp N ia-x86/losp/x86-pc/textmode-console.lisp N ia-x86/losp/x86-pc/textmode.lisp N ia-x86/losp/x86-pc/vga.lisp 1 conflicts created by this import. Use the following command to help the merge: cvs checkout -jfrodef:yesterday -jfrodef ia-x86 Date: Tue Jan 13 05:53:41 2004 Author: ffjeld New module ia-x86 added

1 0

[movitz-cvs] CVS update: ia-x86/ia-x86.asd
by Frode Vatvedt Fjeld 12 Jan '04

12 Jan '04

Update of /project/movitz/cvsroot/ia-x86 In directory common-lisp.net:/tmp/cvs-serv31402 Modified Files: ia-x86.asd Log Message: Fixed to be symbol-case independent. Date: Mon Jan 12 15:22:52 2004 Author: ffjeld Index: ia-x86/ia-x86.asd diff -u ia-x86/ia-x86.asd:1.3 ia-x86/ia-x86.asd:1.4 --- ia-x86/ia-x86.asd:1.3 Mon Jan 12 15:02:52 2004 +++ ia-x86/ia-x86.asd Mon Jan 12 15:22:52 2004 @@ -7,14 +7,14 @@ ;; Author: Nikodemus Siivola ;; Created at: Wed Oct 20 23:13:46 1999 ;; -;; $Id: ia-x86.asd,v 1.3 2004/01/12 20:02:52 jdzerins Exp $ +;; $Id: ia-x86.asd,v 1.4 2004/01/12 20:22:52 ffjeld Exp $ ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -(defpackage "IA-X86-SYSTEM" +(defpackage #:ia-x86-system (:use :cl :asdf)) -(in-package "IA-X86-SYSTEM") +(in-package #:ia-x86-system) (defsystem :ia-x86 :serial t ; FIXME: proper dependencies would be nice... @@ -39,7 +39,7 @@ (when (y-or-n-p "Initialize instruction tables? It may take a while, ~ espcially on memory starved boxes.") (operate 'load-op :ia-x86-instr) - (funcall (intern "INIT-INSTRUCTION-TABLES" :ia-x86)))) + (funcall (intern (string '#:init-instruction-tables) :ia-x86)))) (defclass conf-file (cl-source-file) ()) @@ -76,5 +76,5 @@ (operate 'test-op :ia-x86-test)) (defmethod perform ((o test-op) (c (eql (find-system :ia-x86-test)))) - (or (funcall (intern "DO-TESTS" :rt)) + (or (funcall (intern (string '#:do-tests) :rt)) (error "test-op failed")))

1 0

[movitz-cvs] CVS update: ia-x86/ia-x86.asd
by Janis Dzerins 12 Jan '04

12 Jan '04

Update of /project/movitz/cvsroot/ia-x86 In directory common-lisp.net:/tmp/cvs-serv23178 Modified Files: ia-x86.asd Log Message: Call INIT-INSTRUCTION-TABLES after loading instructions. Date: Mon Jan 12 15:02:52 2004 Author: jdzerins Index: ia-x86/ia-x86.asd diff -u ia-x86/ia-x86.asd:1.2 ia-x86/ia-x86.asd:1.3 --- ia-x86/ia-x86.asd:1.2 Mon Jan 12 14:41:49 2004 +++ ia-x86/ia-x86.asd Mon Jan 12 15:02:52 2004 @@ -7,7 +7,7 @@ ;; Author: Nikodemus Siivola ;; Created at: Wed Oct 20 23:13:46 1999 ;; -;; $Id: ia-x86.asd,v 1.2 2004/01/12 19:41:49 ffjeld Exp $ +;; $Id: ia-x86.asd,v 1.3 2004/01/12 20:02:52 jdzerins Exp $ ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; @@ -38,7 +38,8 @@ (defmethod perform :after ((o load-op) (c (eql (find-system :ia-x86)))) (when (y-or-n-p "Initialize instruction tables? It may take a while, ~ espcially on memory starved boxes.") - (operate 'load-op :ia-x86-instr))) + (operate 'load-op :ia-x86-instr) + (funcall (intern "INIT-INSTRUCTION-TABLES" :ia-x86)))) (defclass conf-file (cl-source-file) ())

1 0

[movitz-cvs] CVS update: ia-x86/ia-x86.asd
by Frode Vatvedt Fjeld 12 Jan '04

12 Jan '04

Update of /project/movitz/cvsroot/ia-x86 In directory common-lisp.net:/tmp/cvs-serv23985 Modified Files: ia-x86.asd Log Message: Patch from Nyef. Date: Mon Jan 12 14:41:49 2004 Author: ffjeld Index: ia-x86/ia-x86.asd diff -u ia-x86/ia-x86.asd:1.1.1.1 ia-x86/ia-x86.asd:1.2 --- ia-x86/ia-x86.asd:1.1.1.1 Mon Jan 12 10:23:55 2004 +++ ia-x86/ia-x86.asd Mon Jan 12 14:41:49 2004 @@ -7,7 +7,7 @@ ;; Author: Nikodemus Siivola ;; Created at: Wed Oct 20 23:13:46 1999 ;; -;; $Id: ia-x86.asd,v 1.1.1.1 2004/01/12 15:23:55 ffjeld Exp $ +;; $Id: ia-x86.asd,v 1.2 2004/01/12 19:41:49 ffjeld Exp $ ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; @@ -32,7 +32,8 @@ (:file "read") (:file "codec") (:file "proglist") - (:file "def-instr"))) + (:file "def-instr") + (:file "postload"))) (defmethod perform :after ((o load-op) (c (eql (find-system :ia-x86)))) (when (y-or-n-p "Initialize instruction tables? It may take a while, ~

1 0

[movitz-cvs] CVS update: ia-x86/COPYING
by Frode Vatvedt Fjeld 12 Jan '04

12 Jan '04

Update of /project/movitz/cvsroot/ia-x86 In directory common-lisp.net:/tmp/cvs-serv28096 Added Files: COPYING Log Message: added COPYING Date: Mon Jan 12 10:26:17 2004 Author: ffjeld

1 0