Annotation of OpenXM/src/kan96xx/Kan/debug.sm1, Revision 1.1
1.1 ! takayama 1: % $OpenXM$
! 2:
! 3: %%% debugging for new OpenXM-RFC 100. indeterminate or tree.
! 4: [(parse) (../plugin/cmo.sm1) pushfile] extension
! 5: /f (x+1 + x*h). def
! 6: f [(class) (recursivePolynomial)] dc /g set
! 7: (x) [(class) (indeterminate)] dc /x set
! 8: (x) [(class) (indeterminate)] dc /xx set
! 9: [(sin) (hoge) [(x).]] [(class) (tree)] dc /t set
! 10: g message
! 11: x message
! 12: t message
! 13: g [[x t]] replace /gg set
! 14: gg message
! 15:
! 16: [(cmoObjectToCmo) gg] extension /ggg set
! 17: ggg message
! 18: [(cmoCmoToObject) ggg] extension message
! 19:
! 20:
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>