哪位高手帮我看看我这程序，我的这个怎么画不出图来呢

xiaohaha1985

#include <stdio.h>
#include <uf.h>
#include <uf_defs.h>
#include <uf_exit.h>
#include <uf_ui.h>
#include <uf_styler.h>
#include <uf_mb.h>
( r8 [5 m4 i6 E$ T#include <C:\Documents and Settings\Administrator\My Documents\bsurface\新建文件夹\bsurface\bsurface.h>
0 b& l$ m( ?% b) o1 a$ n+ i
# G" ?. H1 i) r: y& b+ |4 Z1 P#include <stdlib.h>//后加
#include <uf_part.h>
#include <uf_defs.h>
9 f; A: q2 R6 W; K" k0 X#include <uf_modl.h>

1 Z( A( [8 }* w; `#define UF_CALL
#define BSURFACE_CB_COUNT ( 4 + 1 ) /* Add 1 for the terminator */
( j  Y' ?0 \& a6 Z1 W/ n: Mstatic UF_STYLER_callback_info_t BSURFACE_cbs[BSURFACE_CB_COUNT] =
{
' u5 {) l( c1 }& K/ I/ k: I7 V {UF_STYLER_DIALOG_INDEX, UF_STYLER_CONSTRUCTOR_CB  , 0, BSURFACE_constructor_cb},
# V% s9 z. p7 I {UF_STYLER_DIALOG_INDEX, UF_STYLER_DESTRUCTOR_CB   , 0, BSURFACE_destructor_cb},
{UF_STYLER_DIALOG_INDEX, UF_STYLER_OK_CB           , 0, BSURFACE_ok_cb},
{UF_STYLER_DIALOG_INDEX, UF_STYLER_CANCEL_CB       , 0, BSURFACE_cancle_cb},
; Z# ]9 |$ M7 y) q {UF_STYLER_NULL_OBJECT, UF_STYLER_NO_CB, 0, 0 }
- ?* ~) Y7 D( p2 p* S; P};
# |. C$ V# _0 i3 T$ C
0 z( Z* j* R) ?! B$ O5 [; }static UF_MB_styler_actions_t actions[] = {
    { "bsurface.dlg",  NULL,   BSURFACE_cbs,  UF_MB_STYLER_IS_NOT_TOP },
    { NULL,  NULL,  NULL,  0 } /* This is a NULL terminated list */
+ w3 k: j6 \; p$ R};
; v) L  b/ Y* N' C
2 a! _: Z$ I( `9 c1 nstatic void do_ugopen_api(void)
9 r% F' {- f1 |1 M{
4 V: B7 u- u( K' B/ r; X8 M
  char    *prtnam = "create_bsurf";
' F2 I2 P7 E- g" R3 w
  K0 t% F" c$ l0 d0 v( M  /* Points for B-surface  */
7 z9 z. L  J0 x8 ~  F  double points[16][3] = { X1, Y1, Z1,
! i9 S- N, y# [% i: ^+ I                                       X2, Y2, Z2,
9 x8 }5 \4 s+ |" D2 |' ?( w                                       X3, Y3, Z3,
                                       X4, Y4, Z4,
                                       X5, Y5, Z5,
4 E' p3 h9 P/ S. @4 U6 M7 V0 s- l                                       X6, Y6, Z6,
# v1 z/ }& }/ r                                       X7, Y7, Z7,
                                       X8, Y8, Z8,
7 J+ `! O1 u9 F  L4 w- [1 {" j                                       X9, Y9, Z9,
8 v  p$ @$ e% c: J5 r                                       X10, Y10, Z10,
                                       X11, Y11, Z11,
                                       X12, Y12, Z12,
                                       X13, Y13, Z13,
3 n  k7 R9 {) u0 c3 m& T1 |/ A+ {                                       X14, Y14, Z14,
& l/ @4 g" }- g% i0 {                                       X15, Y15, Z15,
  O2 d$ [8 |5 S1 _, m+ {8 O                                       X16, Y16, Z16 };       

  int create_mode = 1;
  int u_closed_status = 0;
1 X+ A& j* x" _  int v_closed_status = 0;
* V0 f* ^; ]' V) X7 L: O  int u_degree = 3;
8 a2 ]  c/ C; I  int v_degree = 3;
  int num_rows = 4;
  int pts_per_row[4] = {4, 4, 4, 4};
* m- ?) L* L/ W6 w2 ~   
  int ii, jj, kk, indx;
        
/ q2 [5 U5 b' ?  tag_t   part_tag;
' ], o$ O0 ^  _+ q  tag_t   bsurf_obj_id = NULL_TAG;

! A# \# v; c6 h! ^2 f9 j: G  UF_MODL_bsurf_row_info_t *pts_info_per_row; /* pts info for each row */
5 f: d% {/ d1 X  UF_MODL_bsurface_t   bsurf;
5 o2 P# L: H) b5 k3 O3 x) j$ K0 [
$ n2 T1 a' @( t* u  o1 Z
  /* Open a new part */
  UF_CALL( UF_PART_new(prtnam, METRIC, &part_tag) );

5 N9 N# e% `' ?- V5 v  {  V  pts_info_per_row = ( UF_MODL_bsurf_row_info_t *)malloc( num_rows *
4 z. r3 i  t# ?7 n: m                       sizeof(UF_MODL_bsurf_row_info_t) );
   
5 h5 A- C+ w1 ~0 I3 j, P9 H  /* allocate and load point and other information for each row of points */
  indx = 0;
  for (ii=0; ii<num_rows; ii++)
  {
; W% E+ r! Q. K2 S4 N4 [5 H7 S    pts_info_per_row[ii].num_points = pts_per_row[ii];  /* can vary */
! I! \  j6 ~5 v" x    pts_info_per_row[ii].points = (double *)malloc( pts_per_row[ii] * 3 *
                                   sizeof(double) );
      
    pts_info_per_row[ii].weight = (double *)malloc( pts_per_row[ii] *
                                   sizeof(double) );
               
    /* load up point and weight info */
6 R5 K7 v, r* L/ k+ v' D    for (jj=0, kk = 0; kk<pts_per_row[ii]; kk++, jj+=3, indx++)
    {
      pts_info_per_row[ii].points[jj] = points[indx][0];
      pts_info_per_row[ii].points[jj+1] = points[indx][1];
; b/ K* E: q5 r0 k" y2 J8 [      pts_info_per_row[ii].points[jj+2] = points[indx][2];
8 x9 P" F& B9 Q9 R      pts_info_per_row[ii].weight[kk] = 1.0;
   
    }
  }
  
  /* create B-surface */
  UF_CALL(UF_MODL_create_bsurf_thru_pts( create_mode, u_closed_status,
                                         v_closed_status, u_degree,
                                         v_degree, num_rows, pts_info_per_row,
                                         &bsurf_obj_id));
7 I. }6 ^) K6 X7 C9 B0 x                   
+ {+ F' I2 u+ |6 E7 d2 l  if ( bsurf_obj_id == NULL_TAG )
4 k% F! _+ m# M7 N- K7 F3 u5 x    printf("*** ERROR CREATING B-SURFACE ***\n");

' m' @  M  X3 E& s" e: S# f  /* free allocated memory */
  for (ii=0; ii<num_rows; ii++)
  {
8 O, R* c! i8 E. @; N% y8 k: d    free(pts_info_per_row[ii].points);
    free(pts_info_per_row[ii].weight);
$ i' q" l* B0 Y* C& d8 _  }
" f1 c* C7 I, P  u6 ^) I! n  
  free(pts_info_per_row);
   
   
0 {7 P' \8 ]* _) N4 e  /* ask the B-surface information */
" [) A- C0 N# N% |. v  UF_CALL(UF_MODL_ask_bsurf( bsurf_obj_id, &bsurf ));
  
* }, L+ _2 ~2 C" d  /* validate the surface */
  if ( (bsurf.order_u != u_degree+1) || (bsurf.order_v != v_degree+1) )
+ P. `: O/ I$ t    printf("*** ERROR ASKING B-SURFACE ***\n");
  
  UF_CALL(UF_MODL_free_bsurf_data(&bsurf));

) S8 ^  v# r* g9 [" a5 \1 Y
" H+ |1 u; Y* Y}
extern DllExport void ufsta (char *param, int *retcode, int rlen)
7 l! K6 v3 j) H  I1 T. c4 q{
    int  error_code;

/ a2 \" R9 f! R2 C1 j; Q4 Z2 }    if ( (UF_initialize()) != 0)
2 G2 r! d" S: ]! V# f" e1 e0 q        do_UGopen_api();  
                return;
                                                
    if ( (error_code = UF_MB_add_styler_actions ( actions ) ) != 0 )
    {
          char fail_message[133];
- u( {' d! l+ [/ Y         
          UF_get_fail_message(error_code, fail_message);
          printf ( "%s\n", fail_message );
    }
. |% u. j( N. P/ ]0 h) ]                                                
    UF_terminate();                             
# w- S5 i' ^$ f4 F; J  @    return;
}
extern int LaunchBsurfaceDialog ( int *response )
{
; G6 V! ~3 T8 @# j* ~5 ^  Q    int  error_code = 0;
: e& y, E( R3 f8 H
7 n; a2 e  S7 @* A+ d! s% k% }    if ( ( error_code = UF_initialize() ) != 0 )
) Y3 D9 F- }( U' z% Y5 Y9 s8 ?3 z           return (0) ;

    if ( ( error_code = UF_STYLER_create_dialog ( "bsurface.dlg",
           BSURFACE_cbs,      /* Callbacks from dialog */
           BSURFACE_CB_COUNT, /* number of callbacks*/
8 C8 Y) C7 L' X# W% |           NULL,        /* This is your client data */
           response ) ) != 0 )
    {
9 \. W9 t4 Y* a0 B          char fail_message[133];

          /* Get the user function fail message based on the fail code.*/
          UF_get_fail_message(error_code, fail_message);
  |0 r7 U, T  G: B( |$ T0 x          UF_UI_set_status (fail_message);
          printf ( "%s\n", fail_message );
    }
3 i3 y  D( X* B' C0 s* n8 X
5 z: P* r- ]2 ]9 I
    UF_terminate();                             
    return (error_code);
; w; v1 a& c3 R7 A2 s2 @2 g/ V}
9 ]; s" e( M! f* S% K8 [- I
extern int ufusr_ask_unload (void)
/ E5 W5 K' d4 j1 n7 R{
     /* unload immediately after application exits*/
     return ( UF_UNLOAD_IMMEDIATELY );
}
: v1 r& r9 P6 ]* Zextern void ufusr_cleanup (void)
{
* O+ D$ W$ f- p- e. t    return;
) n" {9 r1 q4 j' R+ _  H}
#endif

xiaohaha1985

求高手帮忙看看那这程序急用啊

xiaohaha1985

int BSURFACE_ok_cb ( int dialog_id,
8 P8 {: p3 r) G             void * client_data,
7 [) d6 }0 ?* P3 t             UF_STYLER_item_value_type_p_t callback_data)
! l/ q+ W/ P: U4 {& X# a3 y+ l{
3 \% X9 n! C" j% q7 b( r3 r     /* Make sure User Function is available. */  
& {9 q/ O. I9 F; O: W# t5 d3 q     if ( UF_initialize() != 0)
) h5 r7 K  |5 n# r7 b          return ( UF_UI_CB_CONTINUE_DIALOG );
( ]" b0 t. Z/ ]; \& O0 x: h8 d4 o
     /*获取对话框数据*/
$ p( w* a* D! [2 P3 G$ J         
         UF_STYLER_item_value_type_t data;
9 Z+ G2 e% s0 O8 z. A         data.item_attr=UF_STYLER_VALUE;
         
: D, ?; k: |/ ~8 M; p         data.item_id=BSURFACE_REAL_X1;
( A9 X% ]( I! K. H         UF_STYLER_ask_value(dialog_id,&data);
         X1=data.value.real;
! I1 ?7 P& C+ Y: V' ~  T4 y         
         data.item_id=BSURFACE_REAL_Y1;
         UF_STYLER_ask_value(dialog_id,&data);
9 \  N: i/ o- S: I1 d1 f! F9 K         Y1=data.value.real;

     data.item_id=BSURFACE_REAL_Z1;
- ]% o! t( |- H$ V" U, I$ z5 m" _7 Y         UF_STYLER_ask_value(dialog_id,&data);
         Z1=data.value.real;
7 z- }: x2 F* J0 X5 i         
/ l$ d) A) B  r$ u4 Z) |         data.item_id=BSURFACE_REAL_X2;
         UF_STYLER_ask_value(dialog_id,&data);
         X2=data.value.real;
1 n$ v- n3 d5 O# F9 G7 E, M7 F5 [         
( _; c8 Z8 I1 q# D* c9 ~6 C         data.item_id=BSURFACE_REAL_Y2;
# Q9 \+ J; Q/ [, K2 k% S3 l         UF_STYLER_ask_value(dialog_id,&data);
- F( _/ K" Z7 A0 Y3 F  b! M         Y2=data.value.real;
         
         data.item_id=BSURFACE_REAL_Z2;
         UF_STYLER_ask_value(dialog_id,&data);
         Z2=data.value.real;
* ~$ w7 D$ v) i. \9 a         
. a, m4 Z7 j# W" f* R: m; f, O         data.item_id=BSURFACE_REAL_X3;
" s0 a* a9 P5 k) l$ C         UF_STYLER_ask_value(dialog_id,&data);
: s! @% E1 {+ ?! u6 ]2 B( I         X3=data.value.real;
         
/ n) S; {: ], s1 [3 X5 ^         data.item_id=BSURFACE_REAL_Y3;
         UF_STYLER_ask_value(dialog_id,&data);
: U8 M. W( s: ]3 l         Y3=data.value.real;
         
4 G- f$ F0 Q6 T2 r         data.item_id=BSURFACE_REAL_Z3;
) v8 I" M2 y4 n6 ^         UF_STYLER_ask_value(dialog_id,&data);
         Z3=data.value.real;
         
         data.item_id=BSURFACE_REAL_X4;
         UF_STYLER_ask_value(dialog_id,&data);
8 B8 X) P# g) X* G         X4=data.value.real;

! ]3 O" h/ K. @. Z) ?$ ?         data.item_id=BSURFACE_REAL_Y4;
         UF_STYLER_ask_value(dialog_id,&data);
         Y4=data.value.real;
         
         data.item_id=BSURFACE_REAL_Z4;
8 `% o9 N" u. f# D" B         UF_STYLER_ask_value(dialog_id,&data);
4 x( r$ ]9 h4 P$ p: l         Z4=data.value.real;
( b. M$ s, B7 q) u0 B: f         
3 D( C- U8 o/ e  g9 \         data.item_id=BSURFACE_REAL_X5;
# H4 x5 t& t# U9 g5 y: ]         UF_STYLER_ask_value(dialog_id,&data);
         X5=data.value.real;

4 j; w% b* Z; K) @: U! J         data.item_id=BSURFACE_REAL_Y5;
' {, V* x5 E, m, d$ \( L2 m% |         UF_STYLER_ask_value(dialog_id,&data);
         Y5=data.value.real;
, o+ R) |1 B) z! U/ v" L; E         
0 i4 d6 h  S% f1 ^         data.item_id=BSURFACE_REAL_Z5;
         UF_STYLER_ask_value(dialog_id,&data);
         Z5=data.value.real;
         
         data.item_id=BSURFACE_REAL_X6;
         UF_STYLER_ask_value(dialog_id,&data);
  `+ v$ k- r0 I         X6=data.value.real;
: j) z+ W& G- J: ]
         data.item_id=BSURFACE_REAL_Y6;
         UF_STYLER_ask_value(dialog_id,&data);
         Y6=data.value.real;
& Z: J" j) e$ m% \( K) G         
         data.item_id=BSURFACE_REAL_Z6;
% H# C6 z0 a9 @1 r/ A2 l: N  t; Y: A         UF_STYLER_ask_value(dialog_id,&data);
' r5 I8 e3 c- z         Z6=data.value.real;
         
         data.item_id=BSURFACE_REAL_X7;
% l) u0 E7 Z* C- M' j* o  B7 f         UF_STYLER_ask_value(dialog_id,&data);
& ]' X( v, W1 p" }! y0 U$ ^' A. G         X7=data.value.real;
         
! ^. H5 d. N) Q% J3 Q         data.item_id=BSURFACE_REAL_Y7;
, ^$ U9 Y7 Z  q2 n8 n         UF_STYLER_ask_value(dialog_id,&data);
+ P- f3 Z9 ?- l2 s  }7 F1 ]         Y7=data.value.real;
3 ?: b) {& K. F7 j( s" @# G     
         data.item_id=BSURFACE_REAL_Z7;
! I! D5 \+ r$ r$ u  i         UF_STYLER_ask_value(dialog_id,&data);
  s4 k. N# R" f7 Q9 R: g         Z7=data.value.real;
         
: N, g% j( G3 i' C3 j         data.item_id=BSURFACE_REAL_X8;
         UF_STYLER_ask_value(dialog_id,&data);
9 P- B$ j1 O, [) d. L8 ?3 c         X8=data.value.real;
2 |, d3 N4 |; Z" H' K! ?2 B9 ^) ^8 |; y         
' X# w5 C" Z% S+ w( }         data.item_id=BSURFACE_REAL_Y8;
4 o4 T7 x) I0 V- w4 g$ }         UF_STYLER_ask_value(dialog_id,&data);
         Y8=data.value.real;
         
         data.item_id=BSURFACE_REAL_Z8;
         UF_STYLER_ask_value(dialog_id,&data);
3 g" |5 @  H% U- \7 F, y8 Y4 l/ i* i         Z8=data.value.real;
0 }8 m$ L' [4 C" r         
+ D" @4 B  Q% A) W; O         data.item_id=BSURFACE_REAL_X9;
& y+ D0 M- B# @( C' P' }0 L         UF_STYLER_ask_value(dialog_id,&data);
3 R5 h; c& o+ Z8 ?2 b         X9=data.value.real;
         
         data.item_id=BSURFACE_REAL_Y9;
4 n( C" ^% {" W7 c! u& T$ W         UF_STYLER_ask_value(dialog_id,&data);
         Y9=data.value.real;
% w( W/ V  {  p  @: a' f$ q         
         data.item_id=BSURFACE_REAL_Z9;
4 H) i- n1 R; p. V. l3 s         UF_STYLER_ask_value(dialog_id,&data);
. J' s: }- t' T/ {7 T  {. A% P1 R. z         Z9=data.value.real;
         
         data.item_id=BSURFACE_REAL_X10;
         UF_STYLER_ask_value(dialog_id,&data);
, k7 V) f' ?* s% t( U         X10=data.value.real;

         data.item_id=BSURFACE_REAL_Y10;
0 U% h9 G4 t4 ?/ V. L# n( `         UF_STYLER_ask_value(dialog_id,&data);
         Y10=data.value.real;
7 U3 B4 K8 W% `( Z         
         data.item_id=BSURFACE_REAL_Z10;
         UF_STYLER_ask_value(dialog_id,&data);
( h" ]+ H7 Y6 @         Z10=data.value.real;
, @* E0 F2 R# ]         
         data.item_id=BSURFACE_REAL_X11;
         UF_STYLER_ask_value(dialog_id,&data);
         X11=data.value.real;
6 D9 V+ Z% ^' P+ O0 Z# R" q
2 R8 l' ^: C* J9 w% v         data.item_id=BSURFACE_REAL_Y11;
1 N9 G3 }% s; k1 V0 c) U" R         UF_STYLER_ask_value(dialog_id,&data);
         Y11=data.value.real;
         
# M) L6 _+ U5 Q  r( l& z1 _1 |         data.item_id=BSURFACE_REAL_Z11;
         UF_STYLER_ask_value(dialog_id,&data);
         Z11=data.value.real;
8 l5 T, [5 k9 \) h8 s         
) ?" \4 ^% h2 `# U* P         data.item_id=BSURFACE_REAL_X12;
         UF_STYLER_ask_value(dialog_id,&data);
( s0 V! |; J: R7 R  p# W         X12=data.value.real;

         data.item_id=BSURFACE_REAL_Y12;
+ O, w/ c6 U/ I         UF_STYLER_ask_value(dialog_id,&data);
1 P( I. }. }# M4 k' w( G: {         Y12=data.value.real;
         
         data.item_id=BSURFACE_REAL_Z12;
. k9 W7 e9 w+ U; f/ ]         UF_STYLER_ask_value(dialog_id,&data);
         Z12=data.value.real;
0 J% o! i! F: W9 C5 }         
/ [$ V9 `* b- y         data.item_id=BSURFACE_REAL_X13;
         UF_STYLER_ask_value(dialog_id,&data);
, X% x( d# x4 D# ^2 @         X13=data.value.real;
; J% Z" A0 S! X         
         data.item_id=BSURFACE_REAL_Y13;
         UF_STYLER_ask_value(dialog_id,&data);
. P6 D1 J/ A; I; ~' Q         Y13=data.value.real;

7 c& k# m) S/ g* K3 {. Q     data.item_id=BSURFACE_REAL_Z13;
2 E1 m; `; s7 n: p         UF_STYLER_ask_value(dialog_id,&data);
' Y! Q) j% C! U: z4 o         Z13=data.value.real;

         data.item_id=BSURFACE_REAL_X14;
9 ]% g& ^; P' F& r6 Z" i3 ^7 {         UF_STYLER_ask_value(dialog_id,&data);
         X14=data.value.real;
         
         data.item_id=BSURFACE_REAL_Y14;
         UF_STYLER_ask_value(dialog_id,&data);
         Y14=data.value.real;

. {/ `4 D* {4 W, ~! z& e2 v' U     data.item_id=BSURFACE_REAL_Z14;
1 w" A; i- T8 P4 z/ s: y' B         UF_STYLER_ask_value(dialog_id,&data);
         Z14=data.value.real;

; T" m5 i" ^) I. |  U5 p3 M2 E2 Z' O         data.item_id=BSURFACE_REAL_X15;
         UF_STYLER_ask_value(dialog_id,&data);
& h% ?/ z4 S3 u         X15=data.value.real;
         
         data.item_id=BSURFACE_REAL_Y15;
         UF_STYLER_ask_value(dialog_id,&data);
( a2 Q. U  P7 Z/ U; G9 Y         Y15=data.value.real;
1 D- I: e( ?! s: O
1 y1 D8 V9 r3 \     data.item_id=BSURFACE_REAL_Z15;
         UF_STYLER_ask_value(dialog_id,&data);
- V$ ^9 p/ l4 a. |         Z15=data.value.real;
  L1 c- b/ e& g8 X5 {
         data.item_id=BSURFACE_REAL_X16;
         UF_STYLER_ask_value(dialog_id,&data);
         X16=data.value.real;
4 S; L, i# r4 F- k         
         data.item_id=BSURFACE_REAL_Y16;
         UF_STYLER_ask_value(dialog_id,&data);
$ c, ?9 X' Y, \" t! [, Q4 e- A         Y16=data.value.real;

" k, {- \/ I% t0 J4 v& W     data.item_id=BSURFACE_REAL_Z16;
         UF_STYLER_ask_value(dialog_id,&data);
         Z16=data.value.real;

     UF_terminate ();

    /* Callback acknowledged, terminate dialog             */
    /* It is STRONGLY recommended that you exit your       */
  i6 L9 J; n$ e! w) @    /* callback with UF_UI_CB_EXIT_DIALOG in a ok callback.*/
    /* return ( UF_UI_CB_EXIT_DIALOG );                    */
" G6 m9 f& A4 L    return (UF_UI_CB_EXIT_DIALOG);                           

}
+ C# c5 }# Z8 P; a, Q7 P- r4 Mextern int LaunchBsurfaceDialog ( int *response )
/ y5 C6 f) `- B" ]- [8 [# R{
    int  error_code = 0;

8 V8 K! H: I0 U9 I0 q5 c. d. a    if ( ( error_code = UF_initialize() ) != 0 )
& d. d" @4 A+ Y+ S: l% ?5 G           return (0) ;

5 ^% r# Q+ I2 p( `9 W8 H    if ( ( error_code = UF_STYLER_create_dialog ( "bsurface.dlg",
           BSURFACE_cbs,      /* Callbacks from dialog */
5 s6 }6 a- {  \           BSURFACE_CB_COUNT, /* number of callbacks*/
3 X" L# K1 ^, R- @4 `& q; Q           NULL,        /* This is your client data */
8 |% Z0 K1 v0 m           response ) ) != 0 )
    {
0 H1 A+ l1 E' m          char fail_message[133];

4 k+ l* e* F5 V& g4 @          /* Get the user function fail message based on the fail code.*/
3 z' d! |/ Y6 P8 w( h          UF_get_fail_message(error_code, fail_message);
          UF_UI_set_status (fail_message);
( o# \; V: \9 r, [5 Q; E          printf ( "%s\n", fail_message );
    }
9 X$ n: ^& J1 _

. i  i* @7 i) m( |# ~6 R    UF_terminate();                             
, u" G, _& e  C; ]: h    return (error_code);
; z& V! r( r2 \; ~8 r7 d; R  A4 S+ M}