www

Unnamed repository; edit this file 'description' to name the repository.
Log | Files | Refs

commit fd18c2d465dc6a2dbae6f141b83a3f83b67ea3b3
parent 20c567e1d21f654a6a33160b585c95c53bfe319c
Author: Georges Dupéron <jahvascriptmaniac+github@free.fr>
Date:   Wed, 20 Oct 2010 23:42:27 +0200

Merge branch 'master' of github:dumbs/2010-m1s1-compilation

Conflicts:
	VM/instruction.lisp

Diffstat:
MVM/instruction.lisp | 3+++
1 file changed, 3 insertions(+), 0 deletions(-)

diff --git a/VM/instruction.lisp b/VM/instruction.lisp @@ -43,6 +43,7 @@ (defun set-register (vm register value) (send vm 'set-register register value)) (defun size-memory (vm) (send vm 'size-memory)) +;;TODO : Rajouter une fonction resolve pour resoudre les differents modes d'adresssage. ;; TODO : Penser a ajouter une table des opcodes (defvar table-operateurs @@ -193,6 +194,7 @@ et termine par la liste APPEND." ;;Test Unitaire ;; TODO : Faire deftestvar +;; TODO : Finir le test unitaire (load "test-unitaire") (defvar vm (make-vm (+ 10 (random 10)))) (defvar t-address (random (size-memory vm))) @@ -210,4 +212,5 @@ et termine par la liste APPEND." (get-memory vm t-address)) (get-register vm 'R0)) + (dump-vm vm) \ No newline at end of file