tDOM

Hex Artifact Content
Login

Hex Artifact Content

Artifact e4a6d836834554a2a590cbd916cdee937945965ee55709e48b62976a66861ef8:


0000: 2f 2a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  /*--------------
0010: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0020: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0030: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
0040: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 7c  --------------.|
0050: 20 20 20 43 6f 70 79 72 69 67 68 74 20 28 43 29     Copyright (C)
0060: 20 31 39 39 39 20 20 4a 6f 63 68 65 6e 20 43 2e   1999  Jochen C.
0070: 20 4c 6f 65 77 65 72 20 28 6c 6f 65 77 65 72 6a   Loewer (loewerj
0080: 40 68 6f 74 6d 61 69 6c 2e 63 6f 6d 29 0a 2b 2d  @hotmail.com).+-
0090: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
00a0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
00b0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
00c0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
00d0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 0a 7c 0a 7c  ------------.|.|
00e0: 20 20 20 24 49 64 24 0a 0a 7c 20 20 20 54 68 65     $Id$..|   The
00f0: 20 63 6f 6e 74 65 6e 74 73 20 6f 66 20 74 68 69   contents of thi
0100: 73 20 66 69 6c 65 20 61 72 65 20 73 75 62 6a 65  s file are subje
0110: 63 74 20 74 6f 20 74 68 65 20 4d 6f 7a 69 6c 6c  ct to the Mozill
0120: 61 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65  a Public License
0130: 0a 7c 20 20 20 56 65 72 73 69 6f 6e 20 32 2e 30  .|   Version 2.0
0140: 20 28 74 68 65 20 22 4c 69 63 65 6e 73 65 22 29   (the "License")
0150: 3b 20 79 6f 75 20 6d 61 79 20 6e 6f 74 20 75 73  ; you may not us
0160: 65 20 74 68 69 73 20 66 69 6c 65 20 65 78 63 65  e this file exce
0170: 70 74 20 69 6e 0a 7c 20 20 20 63 6f 6d 70 6c 69  pt in.|   compli
0180: 61 6e 63 65 20 77 69 74 68 20 74 68 65 20 4c 69  ance with the Li
0190: 63 65 6e 73 65 2e 20 59 6f 75 20 6d 61 79 20 6f  cense. You may o
01a0: 62 74 61 69 6e 20 61 20 63 6f 70 79 20 6f 66 20  btain a copy of 
01b0: 74 68 65 20 4c 69 63 65 6e 73 65 20 61 74 0a 7c  the License at.|
01c0: 20 20 20 68 74 74 70 3a 2f 2f 77 77 77 2e 6d 6f     http://www.mo
01d0: 7a 69 6c 6c 61 2e 6f 72 67 2f 4d 50 4c 2f 0a 7c  zilla.org/MPL/.|
01e0: 0a 7c 20 20 20 53 6f 66 74 77 61 72 65 20 64 69  .|   Software di
01f0: 73 74 72 69 62 75 74 65 64 20 75 6e 64 65 72 20  stributed under 
0200: 74 68 65 20 4c 69 63 65 6e 73 65 20 69 73 20 64  the License is d
0210: 69 73 74 72 69 62 75 74 65 64 20 6f 6e 20 61 6e  istributed on an
0220: 20 22 41 53 20 49 53 22 0a 7c 20 20 20 62 61 73   "AS IS".|   bas
0230: 69 73 2c 20 57 49 54 48 4f 55 54 20 57 41 52 52  is, WITHOUT WARR
0240: 41 4e 54 59 20 4f 46 20 41 4e 59 20 4b 49 4e 44  ANTY OF ANY KIND
0250: 2c 20 65 69 74 68 65 72 20 65 78 70 72 65 73 73  , either express
0260: 20 6f 72 20 69 6d 70 6c 69 65 64 2e 20 53 65 65   or implied. See
0270: 20 74 68 65 0a 7c 20 20 20 4c 69 63 65 6e 73 65   the.|   License
0280: 20 66 6f 72 20 74 68 65 20 73 70 65 63 69 66 69   for the specifi
0290: 63 20 6c 61 6e 67 75 61 67 65 20 67 6f 76 65 72  c language gover
02a0: 6e 69 6e 67 20 72 69 67 68 74 73 20 61 6e 64 20  ning rights and 
02b0: 6c 69 6d 69 74 61 74 69 6f 6e 73 0a 7c 20 20 20  limitations.|   
02c0: 75 6e 64 65 72 20 74 68 65 20 4c 69 63 65 6e 73  under the Licens
02d0: 65 2e 0a 7c 0a 7c 20 20 20 54 68 65 20 4f 72 69  e..|.|   The Ori
02e0: 67 69 6e 61 6c 20 43 6f 64 65 20 69 73 20 74 44  ginal Code is tD
02f0: 4f 4d 2e 0a 7c 0a 7c 20 20 20 54 68 65 20 49 6e  OM..|.|   The In
0300: 69 74 69 61 6c 20 44 65 76 65 6c 6f 70 65 72 20  itial Developer 
0310: 6f 66 20 74 68 65 20 4f 72 69 67 69 6e 61 6c 20  of the Original 
0320: 43 6f 64 65 20 69 73 20 4a 6f 63 68 65 6e 20 4c  Code is Jochen L
0330: 6f 65 77 65 72 0a 7c 0a 7c 20 20 20 50 6f 72 74  oewer.|.|   Port
0340: 69 6f 6e 73 20 63 72 65 61 74 65 64 20 62 79 20  ions created by 
0350: 4a 6f 63 68 65 6e 20 4c 6f 65 77 65 72 20 61 72  Jochen Loewer ar
0360: 65 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20  e Copyright (C) 
0370: 31 39 39 38 2c 20 31 39 39 39 0a 7c 20 20 20 4a  1998, 1999.|   J
0380: 6f 63 68 65 6e 20 4c 6f 65 77 65 72 2e 20 41 6c  ochen Loewer. Al
0390: 6c 20 52 69 67 68 74 73 20 52 65 73 65 72 76 65  l Rights Reserve
03a0: 64 2e 0a 7c 0a 7c 20 20 20 50 6f 72 74 69 6f 6e  d..|.|   Portion
03b0: 73 20 63 72 65 61 74 65 64 20 62 79 20 5a 6f 72  s created by Zor
03c0: 61 6e 20 56 61 73 69 6c 6a 65 76 69 63 20 61 72  an Vasiljevic ar
03d0: 65 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20  e Copyright (C) 
03e0: 32 30 30 30 2d 32 30 30 32 0a 7c 20 20 20 5a 6f  2000-2002.|   Zo
03f0: 72 61 6e 20 56 61 73 69 6c 6a 65 76 69 63 2e 20  ran Vasiljevic. 
0400: 41 6c 6c 20 52 69 67 68 74 73 20 52 65 73 65 72  All Rights Reser
0410: 76 65 64 2e 0a 7c 0a 7c 20 20 20 50 6f 72 74 69  ved..|.|   Porti
0420: 6f 6e 73 20 63 72 65 61 74 65 64 20 62 79 20 52  ons created by R
0430: 6f 6c 66 20 41 64 65 20 61 72 65 20 43 6f 70 79  olf Ade are Copy
0440: 72 69 67 68 74 20 28 43 29 20 31 39 39 39 2d 32  right (C) 1999-2
0450: 30 30 32 0a 7c 20 20 20 52 6f 6c 66 20 41 64 65  002.|   Rolf Ade
0460: 2e 20 41 6c 6c 20 52 69 67 68 74 73 20 52 65 73  . All Rights Res
0470: 65 72 76 65 64 2e 0a 7c 0a 7c 20 20 20 57 72 69  erved..|.|   Wri
0480: 74 74 65 6e 20 62 79 20 5a 6f 72 61 6e 20 56 61  tten by Zoran Va
0490: 73 69 6c 6a 65 76 69 63 0a 7c 20 20 20 4a 75 6c  siljevic.|   Jul
04a0: 79 20 31 32 2c 20 32 30 30 30 0a 7c 0a 5c 2d 2d  y 12, 2000.|.\--
04b0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
04c0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
04d0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
04e0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d  ----------------
04f0: 2d 2d 2d 2d 2d 2d 2d 2d 2d 2a 2f 0a 0a 69 6e 74  ---------*/..int
0500: 20 6e 6f 64 65 63 6d 64 5f 63 72 65 61 74 65 4e   nodecmd_createN
0510: 6f 64 65 43 6d 64 20 28 54 63 6c 5f 49 6e 74 65  odeCmd (Tcl_Inte
0520: 72 70 20 20 20 20 2a 20 69 6e 74 65 72 70 2c 0a  rp    * interp,.
0530: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0540: 20 20 20 20 20 20 20 20 20 20 20 69 6e 74 20 20             int  
0550: 20 20 20 20 20 20 20 20 20 20 20 6f 62 6a 63 2c             objc,
0560: 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20  .               
0570: 20 20 20 20 20 20 20 20 20 20 20 20 54 63 6c 5f              Tcl_
0580: 4f 62 6a 20 2a 63 6f 6e 73 74 20 20 6f 62 6a 76  Obj *const  objv
0590: 5b 5d 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20  [],.            
05a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 69                 i
05b0: 6e 74 20 20 20 20 20 20 20 20 20 20 20 20 20 63  nt             c
05c0: 68 65 63 6b 4e 61 6d 65 2c 0a 20 20 20 20 20 20  heckName,.      
05d0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
05e0: 20 20 20 20 20 69 6e 74 20 20 20 20 20 20 20 20       int        
05f0: 20 20 20 20 20 63 68 65 63 6b 43 68 61 72 44 61       checkCharDa
0600: 74 61 29 3b 0a 0a 69 6e 74 20 6e 6f 64 65 63 6d  ta);..int nodecm
0610: 64 5f 61 70 70 65 6e 64 46 72 6f 6d 53 63 72 69  d_appendFromScri
0620: 70 74 20 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a  pt (Tcl_Interp *
0630: 69 6e 74 65 72 70 2c 20 0a 20 20 20 20 20 20 20  interp, .       
0640: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0650: 20 20 20 20 20 20 20 64 6f 6d 4e 6f 64 65 20 20         domNode  
0660: 20 20 2a 6e 6f 64 65 2c 0a 20 20 20 20 20 20 20    *node,.       
0670: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0680: 20 20 20 20 20 20 20 54 63 6c 5f 4f 62 6a 20 20         Tcl_Obj  
0690: 20 20 2a 63 6d 64 4f 62 6a 29 3b 0a 0a 69 6e 74    *cmdObj);..int
06a0: 20 6e 6f 64 65 63 6d 64 5f 69 6e 73 65 72 74 42   nodecmd_insertB
06b0: 65 66 6f 72 65 46 72 6f 6d 53 63 72 69 70 74 20  eforeFromScript 
06c0: 28 54 63 6c 5f 49 6e 74 65 72 70 20 2a 69 6e 74  (Tcl_Interp *int
06d0: 65 72 70 2c 20 0a 20 20 20 20 20 20 20 20 20 20  erp, .          
06e0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
06f0: 20 20 20 20 20 20 20 20 20 20 64 6f 6d 4e 6f 64            domNod
0700: 65 20 20 20 20 2a 6e 6f 64 65 2c 0a 20 20 20 20  e    *node,.    
0710: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0720: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0730: 54 63 6c 5f 4f 62 6a 20 20 20 20 2a 63 6d 64 4f  Tcl_Obj    *cmdO
0740: 62 6a 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20  bj,.            
0750: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20                  
0760: 20 20 20 20 20 20 20 20 64 6f 6d 4e 6f 64 65 20          domNode 
0770: 20 20 20 2a 72 65 66 43 68 69 6c 64 29 3b 0a 0a     *refChild);..
0780: 2f 2a 20 45 4f 46 20 24 52 43 53 66 69 6c 65 20  /* EOF $RCSfile 
0790: 24 20 2a 2f 0a 0a 2f 2a 20 45 6d 61 63 73 20 53  $ */../* Emacs S
07a0: 65 74 75 70 20 56 61 72 69 61 62 6c 65 73 20 2a  etup Variables *
07b0: 2f 0a 2f 2a 20 4c 6f 63 61 6c 20 56 61 72 69 61  /./* Local Varia
07c0: 62 6c 65 73 3a 20 20 20 20 20 20 2a 2f 0a 2f 2a  bles:      */./*
07d0: 20 6d 6f 64 65 3a 20 43 20 20 20 20 20 20 20 20   mode: C        
07e0: 20 20 20 20 20 20 20 2a 2f 0a 2f 2a 20 69 6e 64         */./* ind
07f0: 65 6e 74 2d 74 61 62 73 2d 6d 6f 64 65 3a 20 6e  ent-tabs-mode: n
0800: 69 6c 20 2a 2f 0a 2f 2a 20 63 2d 62 61 73 69 63  il */./* c-basic
0810: 2d 6f 66 66 73 65 74 3a 20 34 20 20 20 20 20 2a  -offset: 4     *
0820: 2f 0a 2f 2a 20 45 6e 64 3a 20 20 20 20 20 20 20  /./* End:       
0830: 20 20 20 20 20 20 20 20 20 20 20 2a 2f 0a 0a                */..