; cdxl.datatype test script
; Execute it from the base directory

FailAt 10
Set ECHO ON

; Is here the datatype shared library ?
If EXISTS "cdxl.datatype.ld"
  ; Check if we created the test directory
  If NOT EXISTS "RAM:DataTypes"
    MakeDir "RAM:DataTypes"
    Assign LIBS: RAM: ADD
  EndIf

  ; Copy descriptor
  If NOT EXISTS "RAM:CDXL"
    Copy CLONE FROM="CDXL(%|.info)" TO="RAM:"
  EndIf

  ; Copy class library
  Copy CLONE FROM="cdxl.datatype.ld" TO="RAM:Datatypes/cdxl.datatype"

  ; Get rid of the old version
  C:FlushLibs
Else
  ECHO "No cdxl.datatype.ld in this directory"
  Quit 10
EndIf