(import chicken.pathname)
(make-absolute-pathname #f #f #f)

; $ csc make-absolute-pathname.scm
;
;
; Warning: Invalid argument
;   In file `make-absolute-pathname.scm:2',
;   At the toplevel,
;   In procedure call:
; 
;     (chicken.pathname#make-absolute-pathname #f #f #f)
; 
;   Argument #2 to procedure `make-absolute-pathname' has an invalid type:
; 
;     false
; 
;   The expected type is:
; 
;     string
; 
;   This is the expression:
; 
;     #f
; 
;   Procedure `make-absolute-pathname' from module `chicken.pathname' has this type:
; 
;     (* #!optional string string -> string)
; 
; Warning: Invalid argument
;   In file `make-absolute-pathname.scm:2',
;   At the toplevel,
;   In procedure call:
; 
;     (chicken.pathname#make-absolute-pathname #f #f #f)
; 
;   Argument #3 to procedure `make-absolute-pathname' has an invalid type:
; 
;     false
; 
;   The expected type is:
; 
;     string
; 
;   This is the expression:
; 
;     #f
; 
;   Procedure `make-absolute-pathname' from module `chicken.pathname' has this type:
; 
;     (* #!optional string string -> string)