diff --git a/retropikzel/pffi/shared/main.scm b/retropikzel/pffi/shared/main.scm index dcdae6d..ce73330 100644 --- a/retropikzel/pffi/shared/main.scm +++ b/retropikzel/pffi/shared/main.scm @@ -66,7 +66,6 @@ unsigned-long float double - string pointer void)) diff --git a/tests/compliance.scm b/tests/compliance.scm index 6c31b09..0ccf3d5 100755 --- a/tests/compliance.scm +++ b/tests/compliance.scm @@ -99,8 +99,6 @@ (assert equal? (pffi-type? 'float) #t) (debug (pffi-type? 'double)) (assert equal? (pffi-type? 'double) #t) -(debug (pffi-type? 'string)) -(assert equal? (pffi-type? 'string) #t) (debug (pffi-type? 'pointer)) (assert equal? (pffi-type? 'pointer) #t) (debug (pffi-type? 'void))