Object subclass:'CallDemo'!
!CallDemo class methods!
strdup:arg
    <cdecl: mustFree char* 'strdup' (char*) module:'libc'>
! !

Transcript showCR:( CallDemo strdup:'Hello' )