home *** CD-ROM | disk | FTP | other *** search
/ The Best of Mecomp Multimedia 2 / MECOMP-CD-II.iso / amiga / datatypes / cdxl_datatype / cdxltest < prev   
Encoding:
Text File  |  1997-10-07  |  606 b   |  30 lines
  1. ; cdxl.datatype test script
  2. ; Execute it from the base directory
  3.  
  4. FailAt 10
  5. Set ECHO ON
  6.  
  7. ; Is here the datatype shared library ?
  8. If EXISTS "cdxl.datatype.ld"
  9.   ; Check if we created the test directory
  10.   If NOT EXISTS "RAM:DataTypes"
  11.     MakeDir "RAM:DataTypes"
  12.     Assign LIBS: RAM: ADD
  13.   EndIf
  14.  
  15.   ; Copy descriptor
  16.   If NOT EXISTS "RAM:CDXL"
  17.     Copy CLONE FROM="CDXL(%|.info)" TO="RAM:"
  18.   EndIf
  19.  
  20.   ; Copy class library
  21.   Copy CLONE FROM="cdxl.datatype.ld" TO="RAM:Datatypes/cdxl.datatype"
  22.  
  23.   ; Get rid of the old version
  24.   C:FlushLibs
  25. Else
  26.   ECHO "No cdxl.datatype.ld in this directory"
  27.   Quit 10
  28. EndIf
  29.  
  30.