comp.lang.idl-pvwave archive: archive » Re: IDL: from Sun to MsWindows

Home » Public Forums » archive » Re: IDL: from Sun to MsWindows

Show: Today's Messages :: Show Polls :: Message Navigator
E-mail to friend

Re: IDL: from Sun to MsWindows [message #1089 is a reply to message #1088]

Thu, 03 June 1993 13:08

thompson
Messages: 584
Registered: August 1991

Senior Member

The following routine may also be of use to those worrying about moving for
Unix/VMS to Microsoft Windows.

Bill Thompson

PRO FLAG_LONG_NAMES
;+
; NAME:
; FLAG_LONG_NAMES
; PURPOSE:
; Flags pairs of IDL procedure names which have the same first eight
; characters. These would appear to be the same file on DOS machines.
; CALLING SEQUENCE:
; CD, directory ;(go to desired directory)
; FLAG_LONG_NAMES
; PARAMETERS:
; None.
; OPTIONAL KEYWORD PARAMETERS:
; None.
; COMMON BLOCKS:
; None.
; SIDE EFFECTS:
; None.
; RESTRICTIONS:
; None.
; PROCEDURE:
; The names of each set of .PRO files with the same first eight
; characters are printed to the screen.
; MODIFICATION HISTORY:
; William Thompson, January 1993.
;-
;
ON_ERROR,2
;
; First make sure there are procedure files in the current directory.
;
FILES = FINDFILE('*.pro',COUNT=N_FILES)
IF N_FILES EQ 0 THEN MESSAGE,'No procedure files found'
;
; For each file, determine the eight character equivalent, and look for
; duplicates.
;
LAST = ''
DUPS = ''
FOR I=0,N_FILES-1 DO BEGIN
FDECOMP,FILES(I),DISK,DIR,NAME,EXT,VER
NAME8 = STRMID(NAME,0,8)
IF NAME8 NE LAST THEN BEGIN
IF N_ELEMENTS(DUPS) GT 1 THEN $
FOR J=0,N_ELEMENTS(DUPS)-1 DO PRINT,DUPS(J)
DUPS = NAME
END ELSE BEGIN
DUPS = [DUPS,NAME]
ENDELSE
LAST = NAME8
ENDFOR
;
RETURN
END

Report message to a moderator

[Message index]

		Re: IDL: from Sun to MsWindows By: thompson on Fri, 04 June 1993 06:54
		Re: IDL: from Sun to MsWindows By: hadfield_m on Thu, 03 June 1993 18:12
		Re: IDL: from Sun to MsWindows By: thompson on Thu, 03 June 1993 13:08
		Re: IDL: from Sun to MsWindows By: thompson on Thu, 03 June 1993 11:32
		Re: IDL: from Sun to MsWindows By: thompson on Thu, 03 June 1993 11:14
		Re: IDL: from Sun to MsWindows By: thompson on Thu, 03 June 1993 11:31

Previous Topic:	Re: IDL & Sybase
Next Topic:	Re: New IDL Update Policy

-=] Back to Top [=-

[ Syndicate this forum (XML) ] [

] [

]

Current Time: Fri Oct 10 02:36:32 PDT 2025

Total time taken to generate the page: 0.15820 seconds