```common lisp
(defsystem "mezzano-virgl"
  :components ((:file "package")
               (:file "virgl-protocol")
               (:file "virgl")
               (:file "tgsi")))
```

Add test code to the asd
user
```common lisp
(defsystem "mezzano-virgl"
  :serial t
  :components ((:file "package")
               (:file "virgl-protocol")
               (:file "virgl")
               (:file "tgsi")
               (:file "test")))
```
assistant