[go: up one dir, main page]
Menu ▾ ▴

[f2b791]: / src / face.h  Maximize  Restore  History

Download this file

67 lines (49 with data), 1.4 kB 

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
/* $Id$

 * face.h

 * Copyright (C) 1997-1999 Maciej Stachowiak and Greg J. Badros

 */



#ifndef FACE_H

#define FACE_H



#ifdef HAVE_CONFIG_H

#include <config.h>

#endif



#include <libguile.h>



#include "scwm.h"

#include "screen.h"



typedef struct {

  ButtonFace *bf;

} scwm_face;



extern long scm_tc16_scwm_face;



#define FACEP(X) (SCM_NIMP(X) && (gh_car(X) == (SCM)scm_tc16_scwm_face))

#define FACE(X)  ((scwm_face *)gh_cdr(X))

#define BUTTONFACE(X) (((scwm_face *)gh_cdr(X))->bf)



extern SCM default_titlebar_face;

extern SCM default_border_face;

extern SCM default_lbutton_face[5];

extern SCM default_rbutton_face[5];



#define VALIDATE_ARG_FACE(pos,scm) \

  do { \

  if (!FACEP(scm)) scm_wrong_type_arg(FUNC_NAME,pos,scm); \

  } while (0)



#define VALIDATE_ARG_FACE_COPY(pos,scm,cvar) \

  do { \

  if (!FACEP(scm)) scm_wrong_type_arg(FUNC_NAME,pos,scm); \

  else cvar = FACE(scm); \

  } while (0)



#define VALIDATE_ARG_FACE_USE_DEF(pos,scm,val) \

  do { \

  if (UNSET_SCM(scm)) scm = val; \

  else if (!FACEP(scm)) scm_wrong_type_arg(FUNC_NAME,pos,scm); \

  } while (0)





#define VALIDATE_ARG_BUTTONFACE_COPY(pos,scm,cvar) \

  do { \

  if (!FACEP(scm)) scm_wrong_type_arg(FUNC_NAME,pos,scm); \

  else cvar = BUTTONFACE(scm); \

  } while (0)





#endif /* FACE_H */



/* Local Variables: */

/* tab-width: 8 */

/* c-basic-offset: 2 */

/* End: */

/* vim:ts=8:sw=2:sta 

 */