src/Xw/Xw_set_typemap.cxx

   1 // Copyright (c) 1999-2012 OPEN CASCADE SAS
   2 //
   3 // The content of this file is subject to the Open CASCADE Technology Public
   4 // License Version 6.5 (the "License"). You may not use the content of this file
   5 // except in compliance with the License. Please obtain a copy of the License
   6 // at http://www.opencascade.org and read it completely before using this file.
   7 //
   8 // The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
   9 // main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
  10 //
  11 // The Original Code and all software distributed under the License is
  12 // distributed on an "AS IS" basis, without warranty of any kind, and the
  13 // Initial Developer hereby disclaims all such warranties, including without
  14 // limitation, any warranties of merchantability, fitness for a particular
  15 // purpose or non-infringement. Please see the License for the specific terms
  16 // and conditions governing the rights and limitations under the License.
  17
  18
  19 #include <Xw_Extension.h>
  20
  21 /* ifdef then trace on */
  22 #ifdef TRACE
  23 #define TRACE_SET_TYPEMAP
  24 #endif
  25
  26 /*
  27    XW_STATUS Xw_set_typemap(awindow,atypemap):
  28    XW_EXT_WINDOW *awindow
  29    XW_EXT_TYPEMAP *atypemap
  30
  31         Set a typemap to an existing window
  32
  33         Returns XW_ERROR if Bad Typemap
  34         Returns XW_SUCCESS if successful
  35
  36 */
  37
  38 #ifdef XW_PROTOTYPE
  39 XW_STATUS Xw_set_typemap (void *awindow,void *atypemap)
  40 #else
  41 XW_STATUS Xw_set_typemap (awindow,atypemap)
  42 void *awindow;
  43 void *atypemap ;
  44 #endif /*XW_PROTOTYPE*/
  45 {
  46   XW_EXT_WINDOW *pwindow = (XW_EXT_WINDOW*)awindow;
  47   XW_EXT_TYPEMAP *ptypemap = (XW_EXT_TYPEMAP*)atypemap ;
  48     if( !Xw_isdefine_window(pwindow) ) {
  49         /*ERROR*Bad EXT_WINDOW Address*/
  50         Xw_set_error(24,"Xw_set_typemap",pwindow) ;
  51         return (XW_ERROR) ;
  52     }
  53
  54     if( !Xw_isdefine_typemap(ptypemap) ) {
  55         /*ERROR*Bad EXT_TYPEMAP Address*/
  56         Xw_set_error(20,"Xw_set_typemap",ptypemap) ;
  57         return (XW_ERROR) ;
  58     }
  59
  60     _TYPEMAP = ptypemap ;
  61     _TYPEMAP->maxwindow++ ;
  62
  63 #ifdef TRACE_SET_TYPEMAP
  64 if( Xw_get_trace() ) {
  65     printf(" Xw_set_typemap(%lx,%lx)\n",(long ) pwindow,(long ) ptypemap) ;
  66 }
  67 #endif
  68
  69         return (XW_SUCCESS);
  70 }