/simpletypesystem/trunk

To get this branch, use:
bzr branch http://gegoxaren.bato24.eu/bzr/simpletypesystem/trunk

« back to all changes in this revision

Viewing changes to libssts/Box.c

  • Committer: Gustav Hartvigsson
  • Date: 2021-01-07 22:32:25 UTC
  • mfrom: (151.1.2 simpletypesystem_meson)
  • Revision ID: gustav.hartvigsson@gmail.com-20210107223225-4i46581v09jkt7tr
* Merged lp:~gustav-hartvigsson/simpletypesystem/meson

Show diffs side-by-side

added added

removed removed

Lines of Context:
libssts/Box.c
14
14
    slong                        m_long;
15
15
    sshort                       m_short;
16
16
    schar                        m_char;
 
17
    #if 0
17
18
    wchar_t                      m_wchar; /*< @depricated */
 
19
    #endif
18
20
    suchar                       m_uchar;
19
21
    suint                        m_uint;
20
22
    sulong                       m_ulong;
21
23
    sushort                      m_ushort;
22
24
    schar *                      m_string;
 
25
    #if 0
23
26
    wchar_t *                    m_wstring; /*< @depricated */
 
27
    #endif
24
28
    suchar *                     m_ustring;
25
29
  } data;
26
30
};
124
128
  return self;
125
129
}
126
130
 
127
 
 
 
131
#if 0
128
132
SBox *
129
133
s_box_new_wchar (wchar_t wc) {
130
134
 
134
138
 
135
139
  return self;
136
140
}
 
141
#endif
137
142
 
138
143
SBox *
139
144
s_box_new_uint (suint ui) {
172
177
  return self;
173
178
}
174
179
 
 
180
#if 0
175
181
SBox *
176
182
s_box_new_wstring (wchar_t * ws) {
177
183
  SBox * self = internal_s_box_new ();
180
186
 
181
187
  return self;
182
188
}
 
189
#endif
183
190
 
184
191
void
185
192
s_box_free (SBox * self) {
257
264
  return self->priv->data.m_char;
258
265
}
259
266
 
 
267
#if 0
260
268
wchar_t
261
269
s_box_get_wchar (SBox * self, SError * err)  {
262
270
  _internal_s_box_set_err_on_missmatch (self, S_TYPE_WCHAR, err);
265
273
  }
266
274
  return self->priv->data.m_wchar;
267
275
}
 
276
#endif
268
277
 
269
278
suint
270
279
s_box_get_uint (SBox * self, SError * err)  {
302
311
  return self->priv->data.m_string;
303
312
}
304
313
 
 
314
#if 0
305
315
wchar_t *
306
316
s_box_get_wstring (SBox * self, SError * err)  {
307
317
  _internal_s_box_set_err_on_missmatch (self, S_TYPE_WSTRING, err);
310
320
  }
311
321
  return self->priv->data.m_wstring;
312
322
}
 
323
#endif
313
324
 
314
325
suchar *
315
326
s_box_get_ustring (SBox * self, SError * err)  {
343
354
      case S_TYPE_STRING:
344
355
        s_free (priv->data.m_string);
345
356
        break;
 
357
      #if 0
346
358
      case S_TYPE_WSTRING:
347
359
        s_free (priv->data.m_wstring);
348
360
        break;
 
361
      #endif
349
362
      default:
350
363
        s_warn_print ("[SBox] free_data was set despite not being an object"
351
364
                      "that can be freed.");
403
416
      ret_val = s_string_new_fmt ("(SBox, Unsigned Short: %hu)",
404
417
                                  self->priv->data.m_ushort);
405
418
      break;
 
419
    #if 0
406
420
    case (S_TYPE_WCHAR):
407
421
      ret_val = s_string_new_fmt ("(SBox, Wide Char: %lc)",
408
422
                                  self->priv->data.m_wchar);
409
423
      break;
 
424
    
410
425
    case (S_TYPE_WSTRING):
411
426
      ret_val = s_string_new_fmt ("(SBox, Wide String: %s)",
412
427
                                  s_wstring_to_string (
413
428
                                                   self->priv->data.m_wstring));
414
429
      break;
 
430
    #endif
415
431
    case (S_TYPE_USTRING):
416
432
      ret_val = s_string_new_fmt ("(SBox, U String: %s)",
417
433
                                  s_ustring_to_string (