Craig A. Berry [Wed, 16 May 2007 03:08:51 +0000 (03:08 +0000)]
p4raw-id: //depot/perl@31226
$ dflt = dflt - "Socket" ! optional on VMS
$ ENDIF
$ ! Build this one only for threads without ithreads
-$ IF useithreads .OR. useithreads .EQS. "define" .OR. .NOT. use_threads THEN dflt = dflt - "Thread"
+$ IF F$TYPE(useithreads) .EQS. "" .OR. .NOT. use_threads
+$ THEN
+$ dflt = dflt - "Thread"
+$ ELSE
+$ IF useithreads .OR. useithreads .EQS. "define" THEN dflt = dflt - "Thread"
+$ ENDIF
$ dflt = dflt - "Win32API/File" - "Win32CORE" - "Win32" ! need Dave Cutler's other project
$ dflt = F$EDIT(dflt,"TRIM,COMPRESS")
$!