uffi/tests foreign-var.lisp,1.1,1.2

Update of /pubcvs/uffi/tests
In directory boa.b9.com:/tmp/cvs-serv19659/tests

Modified Files:
	foreign-var.lisp 
Log Message:


Index: foreign-var.lisp
===================================================================
RCS file: /pubcvs/uffi/tests/foreign-var.lisp,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** foreign-var.lisp	14 Aug 2003 21:40:13 -0000	1.1
--- foreign-var.lisp	14 Aug 2003 21:58:44 -0000	1.2
***************
*** 14,19 ****
  (in-package #:uffi-tests)
  
! (def-foreign-var "uchar_13" :char "uffi_tests")
! (def-foreign-var "schar_neg_120" :char "uffi_tests")
  (def-foreign-var "uword_257" :unsigned-short "uffi_tests")
  (def-foreign-var "sword_neg_321" :short "uffi_tests")
--- 14,19 ----
  (in-package #:uffi-tests)
  
! (def-foreign-var "uchar_13" :unsigned-byte "uffi_tests")
! (def-foreign-var "schar_neg_120" :byte "uffi_tests")
  (def-foreign-var "uword_257" :unsigned-short "uffi_tests")
  (def-foreign-var "sword_neg_321" :short "uffi_tests")