pdf_prim.c

changeset 101
385a2f77a5d8
parent 91
e63762afae80
child 118
c22e1c0a64fd
     1.1 --- a/pdf_prim.c	Wed Mar 12 07:38:57 2003 +0000
     1.2 +++ b/pdf_prim.c	Wed Mar 12 07:43:56 2003 +0000
     1.3 @@ -4,7 +4,7 @@
     1.4   *      will be compressed using ITU-T T.6 (G4) fax encoding.
     1.5   *
     1.6   * PDF routines
     1.7 - * $Id: pdf_prim.c,v 1.8 2003/03/10 01:49:50 eric Exp $
     1.8 + * $Id: pdf_prim.c,v 1.9 2003/03/11 23:43:56 eric Exp $
     1.9   * Copyright 2001, 2002, 2003 Eric Smith <eric@brouhaha.com>
    1.10   *
    1.11   * This program is free software; you can redistribute it and/or modify
    1.12 @@ -597,3 +597,22 @@
    1.13  }
    1.14  
    1.15  
    1.16 +/* this isn't really a PDF primitive data type */
    1.17 +char pdf_new_XObject (pdf_page_handle pdf_page, struct pdf_obj *ind_ref)
    1.18 +{
    1.19 +  char XObject_name [4] = "Im ";
    1.20 +
    1.21 +  XObject_name [2] = ++pdf_page->last_XObject_name;
    1.22 +  
    1.23 +  if (! pdf_page->XObject_dict)
    1.24 +    {
    1.25 +      pdf_page->XObject_dict = pdf_new_obj (PT_DICTIONARY);
    1.26 +      pdf_set_dict_entry (pdf_page->resources, "XObject", pdf_page->XObject_dict);
    1.27 +    }
    1.28 +
    1.29 +  pdf_set_dict_entry (pdf_page->XObject_dict, & XObject_name [0], ind_ref);
    1.30 +
    1.31 +  return (pdf_page->last_XObject_name);
    1.32 +}
    1.33 +
    1.34 +