diff --git a/test.bat b/test.bat
index 990e23c..b06bd90 100644
--- a/test.bat
+++ b/test.bat
@@ -16,6 +16,11 @@
   (sb-sys:interactive-interrupt ()^
     (sb-ext:exit :code -1073741510 :abort t)))
 
+@set PORTABLE_TEST_EXP=^
+(progn (handler-case (uiop:quit (apply #'com.inuoe.jzon-tests:main (uiop:command-line-arguments)))^
+         (error ()^
+           (uiop:quit 2))))
+
 @sbcl^
  --noinform^
  --end-runtime-options^
@@ -29,4 +34,14 @@
  --eval "%TEST_EXP%"
 @if %errorlevel% neq 0 exit /b %errorlevel%
 
+@wx86cl64^
+ --quiet^
+ --no-init^
+ --eval "(load """"~/quicklisp/setup.lisp"""")"^
+ --eval "(asdf:load-asd #p""%JZON_ASD_E%\"")"^
+ --eval "(asdf:load-asd #p""%JZON_TESTS_ASD_E%\"")"^
+ --eval "(ql:quickload '#:com.inuoe.jzon-tests)"^
+ --eval "%PORTABLE_TEST_EXP%"
+@if %errorlevel% neq 0 exit /b %errorlevel%
+
 @endlocal
diff --git a/test.sh b/test.sh
index 5c33b94..c3dc0f8 100755
--- a/test.sh
+++ b/test.sh
@@ -12,6 +12,12 @@ test_exp="
     (sb-ext:exit :code -1073741510 :abort t)))
 "
 
+portable_test_exp="
+(progn (handler-case (uiop:quit (apply #'com.inuoe.jzon-tests:main (uiop:command-line-arguments)))
+         (error ()
+           (uiop:quit 2))))
+"
+
 sbcl --noinform \
      --end-runtime-options \
      --no-sysinit \
@@ -22,4 +28,11 @@ sbcl --noinform \
      --eval "(asdf:load-asd #p\"$jzon_test_asd\")" \
      --eval "(ql:quickload :com.inuoe.jzon-tests)" \
      --eval "$test_exp"
-    
+
+lx86cl64 --quiet \
+         --no-init \
+         --eval "(load #p\"~/quicklisp/setup.lisp\")" \
+         --eval "(asdf:load-asd #p\"$jzon_asd\")" \
+         --eval "(asdf:load-asd #p\"$jzon_test_asd\")" \
+         --eval "(ql:quickload :com.inuoe.jzon-tests)" \
+         --eval "$portable_test_exp"