home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / AACD / Programming / powerd / lib / powerd.lha / powerd_ppc / IsNum.ass < prev    next >
Encoding:
Text File  |  1980-10-26  |  199 b   |  19 lines
  1.  
  2. # IsNum(r3:LONG)(LONG)
  3.  
  4.     .text
  5.     .global    _IsNum
  6.  
  7. _IsNum:
  8.     cmpwi    r3,"0"
  9.     blt    .false
  10.     cmpwi    r3,"9"
  11.     bgt    .false
  12. .true:    li    r3,-1
  13.     blr
  14. .false:    li    r3,0
  15.     blr
  16.  
  17.     .type    _IsNum,@function
  18.     .size    _IsNum,$-_IsNum
  19.