git.sur5r.net Git - cc65/blob - libsrc/pet/ksetnam.s

   1 ;
   2 ; Ullrich von Bassewitz, 19.11.2002
   3 ;
   4 ; SETNAM replacement function for the PETs
   5 ;
   6
   7         .export         SETNAM
   8
   9         .include        "pet.inc"
  10
  11
  12 .proc   SETNAM
  13
  14         sta     FNLEN
  15         stx     FNADR
  16         sty     FNADR+1
  17         rts
  18
  19 .endproc
  20